POLY-VU 
@PVA19 


K&M Company 
TORRANCE,CA 90503 


iS) 


a 
* 


SIGMUG vol. 0 4/10/85 


-PJS-DIROO2 1K 
/ COM 3K 
CRC com 3K 
DISPLAY COM 2K 
FEEDBACKJPM 3K 
FIND COM 1K 
FIND DOC 1K 
HOWTO USE 4K 
README PgS 11K 
SIGMUG DIR 13 8K 
ZUG DIR 49K ‘ 


11 file(s). 
42 directory entries remaining. 
A>STAT O: 
Bytes Remaining On O: 25k 
A>TYPE -PJS-DIR.002 
PUBLIC DOMAIN SOFTWARE DIRECTORY DISKETTE 2 
SIG/M and PASCAL2Z Catalog Volume 
Revision 03/07/83 - 


file# filename size description 


-PJS-DIR.002 2K Contents of Volume 2 


CRCKLIST.002 1k List of CRCs for files on this diskette 


RS02.01 / COM 3K - FAST - speeds search (8086.01) 

RS02.02 CRC ~COM 3K Checksum program (S086) 

RS02.03 FIND «COM 1K Used to scan files for <string> (S086.06) 
RS02.04 FIND -DOC 1K Documentation file for FIND.COM (C36.07) 
RS02.05 HOWTO USE 4k HELP file for this diskette 

RS02.06 SIGM -DIR 138K File of SIG/M -Catalog.xxx files 

RS02.08 ZUG -DIR 49K File of PASCALZ -Catalog.xxx files 

O> 


Ss GA 


SIGM DIR 209K 

1 file(s). 

50 directory entries remaining. 
A>STAT OQ: 


Bytes Remaining On O: 32k 


A>. 


t/ 1e/ “J 


@ 


$ 


TYPE O:HOWTO.USE 


SIG/M UG CP/M PUBLIC DOMAIN SOFTWARE DIRECTORY DISKETTE 2 


The files found on this diskette are briefly described in 
the file —PJS-DIR.O02. Programs on this diskette are taken from 
CP/M public domain software volumes collected and released by the 
SIG/M and the PASCALZ Users Groups. A companion volume, —PJS-— 
DIR.0O1 contains directories of the CP/MUG and PICONET Users 
Groups. 


DIRECTORY FILE FORMAT: 


The content and format of the -catalog files as released by 
CPMUG, SIG/M, PASCALZ and PICONET vary considerably. To 
standardize the format on the directory (.DIR) files the original 
-catalog files have been modified to the following five fields: 


FILE# FILENAME SIZE CRC _ DISCRIPTION 


The directory files (SIGM.DIR and ZUG.DIR) on this diskette 
are brief descriptions of the -Catalog.xxx files from each SIG/M 
and Pascal Z User Group volume. Descriptions have been’ added 
where none existed, extraneous verbage has been removed from the 
comments, and in some cases wording has been clarified. Only one 
line has been used per file to make better use of FIND.COM. 


HOW TO USE THIS DISKETTE: 


The directory files, SIGM.DIR and ZUG.DIR can be displayed 
or hard printed out directly, or FIND (also on the disk) can be 
used to locate the program or programs you are looking for. We 
have also included the FAST program (/.COM) to expedite your 
search, however, this may not work reliably on all computers. 
Should you have a problem, run FIND without using FAST [(/.COM). 


To locate a particular file or files, type the following: 
/ FIND B: filename.typ string 


This example command string can be broken down into the 
following parts for easier understanding: 


/ - FAST program to expedite searching (loptional]) 
B: = The drive number on which you want to search 
(optional). If not used the default option will be the drive 


you are on. 


<filename.typ> - This is. the file name (a.g. 
SIGM.DIR) that you want to be _ searched. Wild card inputs 
compatible with CP/M are permitted in the filename - (e.g. *.DIR 
will cause all of the -DIR files on the drive specified to be 
searched.) See FIND.DOC for more information. 


<string> - This is the ASCII string to search for in 
the file, <filename.typ>. 


The FIND utility will scan the specified filels), looking 
for tines containing the selected 'string'. All directory lines 
(files) which have the specified 'string' witl be printed or 
displayed. You may also search for particular file names or 
Common words such as modem, doc, pas, bas, game, etc. (any ASCII 
string found in 'filename.typ'] To display all of a particular 
volume, (as examples) use the string 'SO26' for SIG/M volume 26, 


'Z07' for Pascal Z votume Uv, or use yust » anu ge, a ulsp ay 
of all entries on the specified file(s). 


EXAMPLE: / FIND SIGM.DIR S026 
(WILL DISPLAY ALL OF DISK 26 OF THE SIGM FILE) 


If you would like to terminate your search early, a control- 
. C will immediately return you to the command level of CP/M. 


Se a a ae oa aR RRR RRC ACR CR goa a a a a ae ae a ae ae ae oa ae ae ae ae ae ak a a aR a a a ak oe 
A> ; P ee 
A>TYPE O:FIND.DOC 
Documentation of various original programs written 
by Ward Christensen 


----- FIND .COM----- 
OVERVIEW: 
Finds ASCII, upper case character strings in a file. 
May take a generic file name, thus may search all .ASM files 


on a disk. Also very useful for finding things in MAST.CAT — 
for example if you have muttipl!e VDM routines: VDMSCROL.ASM, 
PRINTVDM.ASM, etc you could FIND MAST.CAT VDM to see them all. 


USAGE: 
find b:*.asm alpha 
will find all occurrences of ALPHA in all .ASM files on B:. 
Used with LIST.COM which takes a starting line number, 
you can: 1) use find to find a particular part of the code, 
then 2) use LIST specifying a starting line number just before 
the part of the code you wanted to see. 
DEPENDENCIES: 
Note that FIND is a quickie program -— it gets the label 


to search for from the second FCB so you can't put some 
special characters in the ASCII string. Lacs 


find b:*.asm in.to 


would find IN (since .to would be put as the filetype). 


A> 


POLY-vu 
aPViis 


SIGMUG vol. 1 4/10/85 (rev. 9/4/85) 


~CATALOGOO1 1K 
ABSTRACTOO] 2K 
AD COM 39K 
ADSAVE COM 40K ¢€———-—— (THIS FILE CHANGES WITH EACH NEW GAME SAVED) 
ADVENTURMSG 63K 
ATAB DAT 2K 
Glee bee ie <————-(CHEAT FILES CAME FROM SIGMUG vol. 26) 
COMMON DAT 4K 
KTAB DAT 1K 
LTEXT DAT 1K 
SCRAMBLECOM x SroMeV. 2-6 
1K" 
SCRAMBLEDOC ony <——— (SCRAMBLE FILES FROM BSXNOWN-SOURGE THRU DET) 
STEXT DAT 1K 
TRAVEL DAT 5K 
16 file(s). 
41 directory entries remaining. 
C>STAT O: 


Bytes Remaining On O: 74k 


CTYPE O:-CATALOG.001 
SIG/M VOLUME 1 


ORIGINAL ADVENTURE RUN TIME IMPLEMENTED FOR CP/M 


NUMBER SIZE NAME COMMENTS 


-CATALOG.001 CONTENTS OF SIG/M VOL. 1 
ABSTRACT.001 NOTES ON ADVENTURE 

1.1 39K AD.COM 

1.2 63K ADVENTUR .MSG 

1.3 2K ATAB.DAT 

1.4 4K COMMON .DAT 

1.5 1K KTAB.DAT 

1.6 1K LTEXT.DAT 

1.7 1K RTEXT.DAT 

1.8 1K STEXT.DAT 

1.9 5K TRAVEL.DAT 

C> 


K&M Company 


IS) TORRANCE, GA 90503 


ADVENTURE GAME version A02 


-CATALOGO001 1K 
ABSTRACTOO1 2K eas? 
AD COM 39K nee oO Aes 7 ama rh j sc 
>ADVENTURNSG 63K AY SAvE He Hane tS 
ATAB DAT 2K ; 
© common var 4k = Apsave,Com = ——~" Sawedl game in Proseas 
KTAB Ss DAT 1K 
LTEXT DAT 1K 
RTEXT DAT 1K 
STEXT DAT 1K 
TRAVEL DAT 5K 


So 


Ady 


sa.| 


11 file(s). 
452 directory entries remaining. 
I> 
ABSTRACT. 001 

Hello. This is the AOQ2 version of Adventure. It is a modification of 
the original Adventure game floating around between CP/M users. This 
version corrects several flaws in the first version. Most noticable is the 
re-activation of the hints (there was a kludge in the previous version 
which kept the hints from working). Also, the SAVE command now works. To 
suspend a game, type SAVE, answer YES when Adventure asks for confirmation, 
and when the game_sto and you get your OS prompt (A> for CP/M, A. for 
CDOS) type SAVEVADSAVE.COM (57) (for CP/M, reverse the filename and record 
count). There also are a couple of fixes made to the database to clean up 
a ‘couple of glitches like a missing or extra line here or there, and a 
couple of places where the end of a message got cut off. 


This AO2 version has one large advantage over the AOl release; that is 
that the message file was compressed to 63K (it used to be 128K). Note: 
This is a change in the format of the file, no messages were deleted. 


Stand by for the forthcoming B00 Adventure -- This one has a cave that 
is twice as large (it's a 550 point version). All of the features of the 
original Adventure are in this version, plus a whole bunch of new rooms, 
treasures, and ways for the bumbling explorer to get himself killed. 


Mike Goetz 


I> INSTRUCTIONS 


Somewhere nearby is colossal cave, where others have found 
fortunes in treasure and gold, though it is rumored that 
some who enter are never seen again. Magic is said to work 
in the cave. I will be your eyes and hands. Direct me with 
commands of 1 or 2 words. I should warn you that I look at 
only the first four letters of each word, so you'll have to 
enter "northeast" as "ne" to distinguish it from "north", 
and "down" as "descend" or just "d" to distinguish it from 
"downstream". (Should you get stuck, type "help" for some 
general hints. For information on how to end your 
adventure, etc., type “info".) 


This is version A02, by Mike Goetz (NYACC) 4/23/80. 

You are standing at the end of a road before a small brick 
building. Around you is a forest. A small stream flows out 
of the building and down a gully. 


=> 


HELP Pdveninr Game Ve REG 


I know of places, actions, and things. Most of my 
vocabulary describes places and is used to move you there. 
To move, try words like forest, building, downstream, enter, 
) east, west, north, south, up, or down. I know about a few 
special objects, like a black rod hidden in the cave. These 
objects can be manipulated using some of the action words 
that I know. Usually you will need to give both the object 
and action words (in either order), but sometimes I can 
infer the object from the verb alone. Some objects also 
imply verbs; in particular, "inventory" implies "take 
inventory", which causes me to give you a list of what 
you're carrying. The objects have side effects; for 
instance, the rod scares the bird. Usually people having 
trouble moving just need to try a few more words. Usually 
people trying unsuccessfully to manipulate an object are 
attempting something beyond their (or my!) capabilities and 
should try a completely different tack. To speed the game 
you can sometimes move long distances with a single word. 
For example, "building" usually gets you to the building 
from anywhere above ground except when lost in the forest. 
Also, note that cave passages turn a lot, and that leaving a 
room to the north does not guarantee entering the next from 


the south. 
Good luck! 
-> INFO 


oe If you want to end:.your adventure early, say "quit™. 

’ To suspend your adventure such that you can continue 
later, say "suspend" (or "pause" or "save"). To see 
how. well you're doing, say "score". To get full credit for 
a treasure, you must have left it safely in the building, 
though you get partial credit just for locating it. You 
lose points for getting killed, or for quitting, though the 
former costs you more. There are also points based on how 
much (if any) of the cave you've managed to explore; in 
particular, there is a large bonus just for getting in (to 
distinguish the beginners from the rest of the pack), and 
there are other ways to determine whether you've been 
through some of the more harrowing sections. If you think 
you've found all the treasures, just keep exploring for a 
while. If nothing interesting happens, you haven't found 
them all yet. If something interesting *DOES* happen, it 
means you're getting a bonus and have an opportunity to 
garner many more points in the master's section. I may 
occasionally offer hints if you seem to be having trouble. 
If I do, I'll warn you in advance how much it will affect 
your score to accept the hints. Finally, to save time or 
paper, you may specify "brief", which tells me never to 
repeat the full description of a place unless you explicitly 
ask me to. 


-> 


if Ly 


TYPE CHEAT.DOC 
CHEAT.ADV is the unofficial cheat sheet to Adventure (Sig/M 
volume 1). The file is passworded and needs to be unSCRAMBLEd. 


SCRAMBLE is a command used to encode/decode a CP/M file. 
The format of the command is: 

SCRAMBLE filename.type password 
where "password" is an 8 character password made of characters 
permissible in a file name (i.e. no ".", etc). The requested 
file is scrambled, and re-written in place. 
Note that if an attempt is made to unscramble a scrambled file, 
using the WRONG password, then the file is technically "double 
scrambled" and SCRAMBLE would then have to be executed TWICE, 
once with the original password, and once with the erroneously- 
used password. 


The password is a magic word in Adventure. It appears in the text 
of the original version. 


from your friendly Pirate 


C> 


© 


© 


TYPE SCRAMBLE.DOC 
SCRAMBLE is a command used to encode a CP/M file. 


The format of the command is: 

SCRAMBLE filename.type password 
where "password" is an 8 character password made of characters 
perissible in a file name (i.e. no ".", etc). To obtain a good 
"initial seed" for the scrambling process, no character in the 
password may appear more than twice. 


The requested file is scrambled, and re-written in place, 

To un-scramble the file, the IDENTICAL command is issued, 

j.e. SCRAMBLE filename.type password. This is because 
SCRAMBLE does an "exclusive-or" type modification to the file, 
and doing two identical exclusive-or's to data result 

in the same data being retuned. 


I feel a scrambled file is quite secure. Given that a file 
was scrambled and the password forgotten, I know of no way to 
determine what the original file was. Even a file which 

is all binary-0's, is sufficiently scrambled to defy finding 
out what the password or original data was. ...But I assume 
no responsibility for the "security" of files scrambled 

with SCRAMBLE as I am not a "student of cryptology”. 


Note also, that if an attempt is made to unscramble a scrambled 
file, using the WRONG password, then the file is technically 
"double scrambled" and SCRAMBLE would then have to be executed 
TWICE, once with the original password, and once with the 
erroniously-used password. Because of the exclusive or-ing 
process, either password may be used either time. 


03/11/79 Ward Christensen 
c> 


POLY-vUu 
#PVII9 


K&M Company 
TORRANCE, CA 90503 


iS 


-CATALOGOO02 
ABSTRACTOO2 
ADINIT COM 
ADVENSUBFOR 
ADVENT FOR 
ADVENTURDAT 
ADVINIT3FOR 
ADVMAIN FOR 
INSUB FOR 
MAINSB FOR 
10 file(s). 


46 directory entries remaining. 


AD>STAT 0: 


Bytes Remaining On 0: 31k 


A>TYPE 0:-CATALOG.002 


SIG/M VOLUME 2 


SIGMUG vol. 2 6/12/85 


ORIGINAL ADVENTURE SOURCE CODE IMPLEMENTED FOR CP/M 


NUMBER SIZE 


28K 
13K 
5K 
TAK 
29K 
47K 
5K 
5K 


MPM MPM NM PNP P 
ONWNMN EWN = 


> 
Vv 


NAME 


-CATALOG.002 
ABSTRACT .002 


ADINIT.COM 
ADVENSUB.FOR 
ADVENT.FOR 
ADVENTUR.DAT 
ADVINIT3.FOR 
ADVMAIN.FOR 
INSUB.FOR 
MAINSB.FOR 


COMMENTS 


CONTENTS OF SIG/M VOL. 2 
IMPLEMENTATION NOTES 


TYPE ABO: ABSTRACT.002 

Hello. This is the AO2 version of Adventure. It is a modification of 
the original Adventure game floating around between CP/M users. This 
version corrects several flaws in the first version. Most noticable is the 
re-activation of the hints (there was a kludge in the previous version 
which kept the hints from working). Also, the SAVE command now works. To 
suspend a game, type SAVE, answer YES when Adventure asks for confirmation, 
and when the game stops and you get your OS prompt (A> for CP/M, A. for 
CDOS) type SAVE ADSAVE.COM 157 (for CP/M, reverse the filename and record 
count). There also are a couple of fixes made to the database to clean up 
a couple of glitches like a missing or extra line here or there, and a 
couple of places where the end of a message got cut off. 


This AQ2 version has one large advantage over the A01 release; that is 
that the message file was compressed to 63K (it used to be 128K). Note: 
This is a change in the format of the file, no messages were deleted. 


Stand by for the forthcoming BOO Adventure -- This one has a cave that 
is twice as large (it's a 550 point version). All of the features of the 
original Adventure are in this version, plus a whole bunch of new rooms, 
treasures, and ways for the bumbling explorer to get himself killed. 


To compile this mess, you'll need a FORTRAN compiler and 64K of RAM. 
You will also need more disk space than is available on a Single density 
diskette, so you're going to have to do some disk swapping to get this all 
compiled. There are three phases to geting this thing running. First you 
must create the runtime program (AD.COM). This program uses a bunch of 
database files which are created by a second program (ADINIT.COM). 
Therefore you must also create this program. Finally, you must create the 
database using ADINIT. 


To create AD, you must compile the following files: ADVMAIN, MAINSB, 
and ADVENSUB. NOTE: ADVENSUB is used for both programs. Then link them 
together: 


LINK ADVMAIN, MAINSB, ADVENSUB/S,FORLIB/S, AD/N/E 


To create ADINIT, you must compile ADVENT, ADVINIT3, INSUB, and use 
ADVENSUB again. To link them: 


LINK ADVENT, ADVINIT3,INSUB, ADVENSUB/S,FORLIB/S, ADINIT/N/E 
Finally, to create the database, put the data file (ADVENTUR.DAT) in 
drive B, a blank (more or less) disk in A, and run ADINIT. It takes about 
six minutes running on a 4mhz Z-80 with Persci 277 drives. Note: I 


enhanced the efficiency of this program considerably; it used to take more 
than twice as long to run. 


Mike Goetz 


A> 


POLY-vu 
#PV119 


K&M Company 
TORRANCE, CA 90503 


S) 


SIGMUG vol. 3 6/12/85 
-CATALOG003 OK =———CAD epze 


ADV COM 36K 

ADVI DAT 31K 

ADVI PTR 4K 

ADVT DAT 105K 

ADVT PTR 15K 

6 file(s). 

49 directory entries remaining. 
ADSTAT 0: 


Bytes Remaining On 0: 50k 
A> 


POLY-vu 
#PV119 


K&M Company 
TORRANCE CA 90503 


iS) 


Oo 


-CATALOGO08 
BOOT ASM 
BOOTER DOC 
CHAT13 ASM 
DCHBYE57ASM 
MBOOT3 ASM 
MODEM5A ASM 
NEWBAUD ASM 
PAS2CPM ASM 


PASCAL ASM 
PASCAL COM 
PASCAL DOC 
PASTOCPMASM 
PBOOT ASM 
PGEN ASM 
PGEN COM 
PINIT ASM 
PLNK1018ASM 
RBBS22 ASC 
RBBS22 DOC 
RBSUTL22 ASC 
READ ME 
More.. 
SIG/M LIB 
TEST ASM 
XMODEM38ASM 
25 file(s). 


32 directory entries remaining. 


ADSTAT 0: 


Bytes Remaining On O: Ok 


A> 


SIGMUG vol. 


8 


6/12/85 


TYPE -CATALOG. 008 
SIG/M volume 8 


8.01 
8.02 
8.03 


8.04 
8.05 
8.06 
8.07 
8.08 
8.09 
8.10 
8.11 
8.12 
8.13 


8.14 
8.15 


8.16 
8.17 
8.18 
8.19 
8.20 
8.21 
8.22 


8.23 


O> 


BOOT .ASM 
BOOTER.DOC 
TEST.ASM 


PAS2CPM.ASM 
PASCAL.ASM 
PASCAL.COM 
PASCAL.DOC 
PASTOCPM 
PBOOT.ASM 
PGEN.ASM 
PGEN. COM 
PINIT.ASM 
READ .ME 


CHAT13.ASM 
DCHBYE57.ASM 


MODEM5A.ASM 
PLNK1018.ASM 
NEWBAUD.ASM 
RBBS22.ASC 
RBBS22.DOC 
RBSUTL22.ASC 
MBOOT3.ASM 


XMODEM38.ASM 


PASCAL and Communications related programs 


PASCAL related programs 


Sample BOOT for PASCAL 

PASCAL documentation for CP/M 
Scan and load 8080/2Z80 Pascal 
interpreter 

Format conversion 
Initialization of PASCAL system 


Format conversion 
Utilities to initialize PASCAL system 


PASCAL startup documentation 


Communications related programs 


5K 
24K 


46K 
21K 
4K 
20K 
6K 
9K 
8K 


24K 


2-way communications with remote caller 
Upgrade of remote console DCHBYE55 

on SIG/M 7.01 

Auto-dial and auto re-dial capability 
on DC Hayes and PMMI modem boards 
Upgrade of PLNK925 on SIG/M 7.6 and 
CP/M UG 19.4 with more modem types 
Switch BAUD rate on a remote PMMI 

to readjust modem speed 

Update of RBBS in SIG/M volume 7 


Compacted version of MODEM for RECV 
only usage 

Update of SIG/M 7.8 - remote CP/M to 
CP/M transfer 


TYPE PASCAL.DOC 


Bringing UCSD Pascal up for the first time 


To bring up Pascal first assure yourself that you have a standard 

BIOS area (i.e. all i/o vectors are in order) and that the warm boot 

vector is in place. Next if you have a single drive system, make sure that 
your BIOS ignors all requests to drive B. Two drive systems will require 
diskettes in both drives until you modify your disk drivers to return a 

not ready condition (i.e. a 1 in the A register) when the drive has no diskettee 
Now bring up your standard system, and run the program PASCAL.COM supplied 

on the 8080/280 support diskette. This program will prompt you with a request 
for a Pascal system diskette in dirve A. At that time insert the UCSD 
distribution Pascal diskette and if you have a second dirve place 

any initialized diskette in that drive as well. Type return and enter the 
world of pascal. 


O>TYPE READ.ME 
AFTER THE DOCUMENTATION WAS PRINTED WE DISCOVERED THAT A FARLY LARGE NUMBER 
OF PEOPLE HAVE BIOS'S LARGER THAN THE STANDARD 512 BYTES. IF YOU DO... 


“MSIZE = SIZE OF MEMORY IN KBYTES AS USUAL. 
BIOSSZ = SIZE OF BIOS IN BYTES. BIOSSZ MUST BE A MULTIPLE OF 256. 


THE ONLY THING AFFECTED IS IS PUTTING A BOOTER ONTO A PASCAL DISK. 
o™ STEPS TO BE FOLLOWED ARE: 
ww 
1. COMPUTE LOADP := MSIZE*1024-BIOSSZ-1024; 
BIOSORG := MSIZE*1024-BIOSSZ 


2. WRITE THE PROGRAM PBOOT AND ASSEMBLE IT. 
PBOOT MUST LOAD SECTORS 2 THRU 9 + BIOSSZ/128 
IT MUST LOAD THEM STARTING AT LOCATION 
LOADP, AND THEN JUMP TO LOADP. 


3. CHANGE MSIZE AND BIOSSZ IN PINIT AND ASSEMBLE. 


4. CHANGE BIOSSZ IN PGEN AND REASSEMBLE, THEN LOAD. 
(THEREBY CREATING PGEN.COM) 


5. STITCH TOGETHER THE PIECES 
A) TO FIND THE OFFSET PINIT.HEX SHOULD BE READ IN WITH, USE 
LOADP RATHER THAN BAOO. 
B) TO FIND THE OFFSET BIOS.HEX SHOULD BE READ IN WITH, USE 
BIOSORG RATHER THAN BEOO. 
C) SAVE 14 + BIOSSZ/256 RATHER THAN 16 WHEN SAVING 
PGEN.COM : 


TYPE BOOTER.DOC 
Forming a Pascal System Booter 


r) To create an UCSD Pascal system booter you must have the following: 
1) A short boot loader that will read in track 0 sectors 2 - 13 
2) A copy of PINIT.ASM 
3) A hex version of your current BIOS 


4) A copy of PGEN.COM 


The short boot loader of 1) can be generated from your current system 
boot loader if either a source or listing of it is available. This trans- 
formation process is simply the reduction of a two track bootstrap into a 
single track one. Two programs BOOT.ASM and PBOOT.ASM are provided as inspir- 
ation for this proceedure. 


NOTE: PBOOT loads its sectors to location (MSIZE-48) *1024+0BA00H 
and then jumps to that same point. 


If you have no inkling of how your current system boot either loads or 
works, you will have to prevail on your system supplier for that information. 


PINIT.ASM is the source for the code that boots in and starts 
YSTEM.MICRO, the P-Machine interpreter. A quick edit of PINIT.ASM is needed 
to modify the MSIZE equate to match the memory size (in kilobytes) of the 
current system BIOS. Once this has been done each of the modules PBOOT, PINIT 


and BIOS must be assembled to produce the .HEX files which will be overlayed 
into PGEN's data area as follows: 


NOTE: In the following we assume a 48k system 


A>DDT PGEN.COM 7Read PGEN code into memory 


DDT VERS 1.3 We will be overlaying PBOOT, 


‘ 
NEXT PC ; PINIT, and BIOS into PGEN's 
0300 0100 ; data area, and finally saving 

7 the memory image. 
-IPBOOT.HEX ;Set 'PBOOT.HEX'’ as the input file 
-H900 O 7PBOOT starts at location 0, we want 
0900 0900 7 to compute a bias to read it to loc 900 
~R900 ;Using this bias we read PBOOT to PGEN's 
NEXT PC + data area 
0980 0000 
~IPINIT. HEX 


7We will now do the same proceedure with 
~H980 BAOO ;PINIT. This object code will go to 


C380 4F80 + location 980, notice PINIT starts at 
/-RAF80 ; BAOO (HEX) in a 48k system. 
“NEXT PC 
OA7D BAOO 7The value below NEXT will vary with the release 
~IBIOS.HEX ;Last we read BIOS to location D80 
~BD80 BEOO 


sie? C380 4F80 ;This should be the same bias value as last time 
ev -R4F80 
Nocm 


yu 


OF76 0000 
we 


A>SAVE 16 PGEN48.COM 
A>PGEN48 


PGEN VERSION 1.0 

GET BOOTER? (Y/N) N 

PUT BOOTER? (Y/N) Y 

WRITING BOOTER TO DRIVE A, TYPE 
AGAIN? (Y/N) N 

REBOOTING CP/M, TYPE RETURN 


O> 


© 


Sip? 
et 


7The value below NEXT is dependant on BIOS 
7We now leave ddt to save our work 


;Our boot writer will be called PGEN48 
;The booter may now be put out to Pascal 


; system disks by executing PGEN48 


3 as shown 


RETURN 


TYPE RBBS22.DOC 
This is a preliminary documentation file for the 2.0 
version of RBBS (Remote Bulletin Board System). More com- 
plete documentation, to include a complete overview as well 
as more detailed implementation notes, is planned. 


SSS SSS SS RPS SSS SRS VSS SSS SSS SSS SS SSS SSS SSS SS SS SSS SS SSS SS SST SSS 


RBBS PROGRAM 


The RBBS software has four new features with the 2.0 
implementation: 


1) Personal messages: A caller can leave a personal 
message to anyone else by entering the password 
"kx", This causes the message to be invisible in 
summary commands, and retrieve and kill, for any- 
one but the sender and receiver. An attempt to 
Kill a personal message by anyone other than the 
sender or receiver (and, of course, the SYSOP), 
will result in a "message not found". 


2) Re-entry: when a user has exited to the operating 
system, RBBS will retain his name in a file called 
"LASTCALR". If RBBS is subsequently re-entered 
with RBBS P (the "P" was arbitrarily chosen), the 
system will retrieve his name from the "LASTCALR" 
file, and skip the sign-on printing. Note that if 
you are using a loader program to load RBBS from 
another user area (under cp/m 2.x), you can make 
this function automatic, by having the loader fill 
in the "P" immediately before it transfers control 


| to RBBS. In this case, your BYE program should 


ws 


store a non-"P" character at location 5DH (default 
cp/m file control block). 


3) Killed messages will now have additional information 

in the record used to store the message number: 
O:<#>:<user name> 

where 0 indicates a killed message to RBBS, <#> is 
the original message number, and <user name> is the 
name of the user who killed the message. This should 
be helpful in restoring messages improperly killed 
by inept/malicious individuals. Note that after 
using an editor to restore the message (be careful 
here - the editor must not choke on blank-filled 
lines), the "BUILDSUM" function of the RBBSUTIL pro- 
gram can be used to generate a new summary file. 


4) Message passwords, previously only stored in the sum- 
mary file, are now duplicated in the message file. 
This was necessary to allow the BUILDSUM function of 
RBBSUTIL to generate a complete summary file. 


Se Seem ESSE SSS ES ESBS SS SSCS SS SOS SS SS SS SSS SSS SSS SSS SSS Sass SSSsss 
RBBS UTILITY PROGRAM (RBBSUTIL) 


The utility program has the following changes with the 
2.0 upgrade: 


1) When transferring a disk file to the message file, 
the files must have already been purged. This in- 


SiyP sures that the files will have been backed up prior 


ed 


to any messages being added. Note also that the 
> 5 Deanrwmp oe" -5°]] glen he hacked u»>d hv nurae, 


2) The purge function writes deleted messages to an ar- 
chive file called <DATE>.ARC, where the date is sup- 
plied by the operator when purge is invoked. The 
archive file is written sequentially, and lines are 
unpacked before writing to conserve space. 


CS 3) The purge function allows renumbering of the messages 
starting at any number specified when purge is in- 
voked. You may choose not to use this option if you 
maintain archives, because duplicate message numbers 
can be left in the archive files. 


4) A new function, "B", will build a summary file from 
the message file. This can be useful after editing 
the message file. It also allows only the message 
file to be saved when doing back-up operations, as 
the summary file can now be derived from the message 
file. Note that releases of RBBS previous to 2.0 did 
not save the passwords in the message file, there- 
fore, a summary file, rebuilt from such a message 
file will not have password protection. 


Ron Fowler 
Nov 18, 1980 
Westland, Mich. 


PREVIOUS DOCUMENTATION OF THE RBBS SYSTEM 
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r+) RBBS.DOC as of 10/23/80 


RBBS is short for "Remote Bulletin Board System". 

RBBS.ASC is a file that was created with MBASIC 5.2. Do 
not try to edit it with a CP/M text editor because some of 
the multiple line statements may have special end-of-line 
sequences which may mess up a video-oriented editor, making it 
impossible to see some of the lines. Use MBASIC 5.2 to edit the 
file. This is public-domain software, feel free to use it on 
your own system. The best way to run this program is to com- 
pile it with the MBASIC compiler, making a COM file out of it. 
It will run much faster that way. This is what Bruce Ratoff 
did, and it works great on his system. 

The POKES to address 0000h change the C3 to a CD during 
execution of this program. Bruce Ratoff tests for this in 
his DCHBYE55 remote console program. This testing is also done 
in the PMMIBY63 remote console program. In the input from modem 
port routine a test is made to see if address 0000h is a CD, if 
so it causes the input routine to ignore control-C, changing it 
to to a null character instead. This makes it impossible for 
the user to control-C out of RBBS. When the program is done, 
if you are exiting to CP/M for file transfers, it changes the CD 
back to a C3 and then jumps to 0000h (warm boot). 

RBBSPURG.ASC is a program for purging dead messages out of 
the RBBS message files. This should be done periodically to 

ompactthe message files, since the "Kill" function simply 
Derctes the pointer to the message, not the message itself. 


NOTE: The above RBBSPURG.ASC has been superceded by 
RBBSUTIL.ASC rof 


; SIGMUG vol. 9 4/10/85 
-CATALOGOO9 2K 
AUTOX ASM 2K 
| CPYFIL15ASM 10K 
i CRCK10/6ASM 41K 
DIRS1015ASM 8K 
DISPLAY COM 3K 
C DISPLAY Doc 3K 
DISPLAYPASM 3K 
DU-10/26ASM 18K 
FIND3/18ASM 10K 
FINDBD38ASM 29K 
LISTGRPSASC 1K 
MDIR8/17ASM 10K 
MFT45 ASM 417K 
MIC-—XFERASM 7K 
MIC-XFERDOC 5K 
MIKEBIOSASM 8K 
NEMAP ASM 9K 
NLIST ASM 14K 
SD-12/15ASM 17K 
SECTOR ASM 40K 
SHOWGRP ASC 2K 
2 
2S More.. 
aa SIG/M LIB ' OK 
a * TERMTESTASM 2K 
USERLST ASM 3K 
VLIST11 ASM BK 
WHICH ASM 4K 
27 file(s). 
83 directory entries remaining. 
A>STAT 0: 


Bytes Remaining On QO: 22k 


A> 


K&M Company 


Ke TORRANCE, CA 30503 


o 


TYPE -CATALOG. 009 
SIG/M volume 9 


9.01 AUTOX.ASM 
9.02 CPYFIL15.ASM 
9.03 CRCK10/6.ASM 
9.04 DIRS1015.ASM 
9.05 DISPLAY.COM 
9.06 DISPLAY .DOC 
9.07 DISPLAYP.ASM 
9.08 DU-10/26 .ASM 
9.09 FIND3/18.ASM 
9.10 FINDBD38.ASM 
9.11 LISTGRPS.ASC 
9.12 MDIR8/17.ASM 
9.13 MFT45.ASM 
9.14 MIC-XFER.ASM 
9.15 MIC-XFER.DOC 
9.16 NFMAP.ASM 
9.17 NLIST.ASM 
9.18 SD-12/15.ASM 
9.19 SECTOR.ASM 
9.20 SHOWGRP.ASC 
9.21 TERMTEST.ASM 
9.22 USERLST.ASM 
9.23 VLIST11.ASM 
9.24 WHICH.ASM 
9.25 MIKEBIOS.ASM 
O>STAT O: 

STAT? 


O> 


utilities 
2K Forces a CP/M command from a user level 
10K Copy large files greater than 512K 
through PIP utility 
11K Upgrade of CRCK3 in SIG/M 4.7 
9K Sorted directory from DIRS10/1 
in SIG/M 4.9 
3K Similar to DIR/ED.COM using 
display commands only 
3K 
3K 
18K Update of disk utility in SIG/M 4.9 
10K Multiple file search routine 
29K Update to FINDBD37 for locating bad 
blocks of disk space in SIG/M 4.14 
1K List track and sector assignment for 
each group 
10K Master directory by users in 
alphabetic sequence 
17K Dr. Dobbs single drive multi-file 
transfer program 
7K Micropolis and regular CP/M 
file transfer 
5K 
9K Sorted directory with option of writing 
file of names 
14K Lists disk file on LST: device 
17K Sorted directory with sizes 
10K Sector disk maintenance program 
2K Print track and sector addresses 
of groups 
2K Terminal diagnostic program 
3K Patch for displaying current user 
level within CP/M prompt 
8K Variable speed TYPE routine 
4K Displays present CP/M release level 
8K Flash Writer I/O driver 


TYPE DISPLA .sbe 


Display, Ver.1.0 
as of 


October 30, 1980 


© ocsscav cin allows displaying an ASCII file on a 24 line 
terminal, with commands similar to Digital Research's ED.COM 
(but without any of the editing facilities). 


For 


Using DISPLAY.COM 


example: DISPLAY FILENAME.TXT<cr> »will envoke the 


display program and load the entire secondary entry 
(FILENAME.TXT) into memory, for subsequent display of the first 
23 lines of that file. Various commands can then be issued from 
the terminal keyboard which will manipulate the display of the 


file. 


The 


an 


Uh wt 
won 


commands shown below with a preceding "n" indicates that 


optional unsigned integer value can be specified to envoke 
iterations of the command. When a command is preceded by a 
sign, the command will cause display of the file in a 


direction towards the start of the file. Unsigned integer 


values 


are assumed to be positive values (fi.e., "+") and 


therefore "+" need not be specified. Also, the buffer pointer 


will 


stop display at the top or bottom of the file if too large 


a value of "n" jis specified. 


Biss cnanae Operation performed: 


Move pointer to beginning of file and display page. 
Move pointer minus n pages and display page. 

Move pointer plus n pages and display page. 

Move pointer to beginning of buffer and display page. 
Move pointer minus n lines and display page. 

Move pointer plus n tines and display page. 


Discard n pages, refill buffer and dispiay the 
current page. 


Discard all date up to the current pointer, refill 
buffer and display the first page. 


Exit DISPLAY and return to CP/M. 
Control-C, exit DISPLAY and return to CP/M. 


Carriage return, move pointer to next page and 
display 


Kelly Smith, MP/M-Net (tm) Sysop 
Best regards, g95-527-9321 (Modem, 300 Baud) _ 


TYPE MilU- | .15- ') 
INSTALLATION AND USE OF MIC-XFER PROGRAM 


SYSTEM REQUIREMENTS: 


IN ORDER TO USER MIC-XFER, THE FOLLOWING MINIMUM CONFIGURATION IS REQUIRED: 


1. IBM-FORMAT CP/M SYSTEM CONFIGURED FOR AT LEAST 28K. 

2. MICROPOLIS CP/M SYSTEM CONFIGURED FOR 17K. 

3. THE SOURCE FILE 'MIC-XFER.ASM' (PROVIDED ON THIS DISK). 

4. THE ABILITY FOR #1 AND #2 TO RESIDE IN THE SAME BUS AT 
THE SAME TIME WITHOUT ANY HARDWARE CONFLICTS. 

5. THE MICROPOLIS CONTROLLER ADDRESS (BOOTSTRAP ADDRESS) MUST BE 
KNOWN. (THIS MAY BE DETERMINED BY INSPECTING THE ADDRESS 
JUMPERS ON THE MICROPOLIS CONTROLLER BOARD, AND INTERPRETING 
THEM ACCORDING TO THE MICROPOLIS MANUAL). 

6. THE ADDRESS OF THE IBM-FORMAT CP/M WARM START VECTOR MUST BE 
KNOWN. (THIS MAY BE DETERMINED BY EXAMINING LOCATIONS 
4 AND 2 IN MEMORY WHILE THE IBM-FORMAT SYSTEM IS RUNNING). 


THE FIRST STEP IN GENERATING MIC-XFER FOR YOUR SYSTEM IS TO GET A COPY OF 


YOUR 17K MICROPOLIS SYSTEM IMAGE ONTO AN IBM-FORMAT DISK. THIS MAY BE DONE 
AS FOLLOWS: 


1. BOOT THE IBM-FORMAT SYSTEM. 
2. TRANSFER CONTROL TO THE MICROPOLIS SYSTEM BY TYPING: 
A>DDT 
DDT VERS 1.4 
-G<MICROPOLIS BOOT ADDRESS> 
THE MICROPOLIS SYSTEM WILL BOOT UP AND SIGN ON. 
3. CREATE A SYSTEM IMAGE FILE BY TYPING: 
re) A>SYSGEN 
ad SYSGEN VERS 1.4 
SOURCE DRIVE NAME (OR RETURN TO SKIP) A 
FUNCTION COMPLETE 
DESTINATION DRIVE NAME (OR RETURN TO REBOOT) <RETURN> 
A>SAVE 36 MIC17.COM 
4. TRANSFER MIC17.COM TO THE IBM-FORMAT SYSTEM BY TYPING (FROM THE 
MICROPOLIS SYSTEM): 
A>DDT MIC17.COM 
DDT VERS 1.4 
NEXT PC 
2500 0100 
-G<IBM-FORMAT WARM START ADDRESS> 


THE IBM-FORMAT SYSTEM SHOULD WARM-BOOT AND PROMPT. TYPE: 
A>SAVE 36 MIC17.COM 


NOW THAT YOU HAVE A COPY OF YOUR MICROPOLIS CP/M ON AN IBM-FORMAT DISK, YOU 


MUST CUSTOMIZE MIC-XFER.ASM FOR YOUR MICROPOLIS CONTROLLER, AND THEN ASSEMBLE 
IT AND COMBINE IT WITH MIC17.COM. THIS IS DONE AS FOLLOWS: 


4. DETERMINE THE CORRECT VALUE FOR THE SYMBOL 'MCTL! IN MIC-XFER. 
THIS MAY BE CALCULATED BY ADDING 200H TO THE MICROPOLIS BOOT 
ADDRESS. FOR EXAMPLE, IF YOUR MICROPOLIS BOOT ADDRESS IS F800, 
THEN THE CORRECT VALUE OF 'MCTL' IS FAOO. 

2, EDIT THE CORRECT VALUE OF 'MCTL' FOR YOUR SYSTEM INTO MIC-XFER.ASM. 

=. THE 'EQU' FOR 'MCTL' MAY BE FOUND ON LINE 6. 

Oo 3. WHILE YOU ARE IN THE EDITOR, YOU MAY WANT TO COMMENT OUT THE 'TITLE! 
STATEMENT IN LINE 1. IF YOU ASSEMBLE MIC-XFER USING 'ASM', THIS 
LINE WILL PRODUCE AN ERROR, BUT THE CORRECT CODE WILL STILL BE 
GENERATED. IF YOU ASSEMBLE MIC-XFER USING 'MAC', THE 'TITLE! 
STATEMENT WILL BE ACCEPTED PROPERLY, AND NEED NOT BE COMMENTED OUT. 


4. USING EITHER 'ASM' OR 'MAC', ASSEMBLE MIC-XFER TO PRODUCE THE 
OBJECT FILE 'MIC-XFER.HEX'. 


5. MERGE MIC-XFER.HEX WITH MIC17.COM BY TYPING: 


A>DDT M1C17 .CUM 
DDT VERS 1.4 
NEXT PC 

2500 0100 
~IMIC-XFER .HEX 
-R 

-GO 


re] A>SAVE 86 MIC-XFER.COM 


THIS COMPLETES INSTALLATION OF MIC-XFER IN YOUR SYSTEM, 
USING MIC-—XFER: 


MIC-XFER WILL TRANSFER ONE OR MORE FILES BETWEEN AN IBM-FORMAT CP/M SYSTEM AND 
A MICROPOLIS CP/M SYSTEM. THE SOURCE DRIVE, DESTINATION DRIVE, AND DIRECTION 
OF TRANSFER MAY BE SPECIFIED IN THE COMMAND LINE. THE CP/M WILDCARDS '?' AND 
't ARE FULLY IMPLEMENTED, MAKING MULTIPLE FILES OR EVEN WHOLE-DISK TRANSFERS 
VERY EASY. MIC-XFER IS EXECUTED BY TYPING: 

A>MIC-XFER S:FFFFFFFF.TTT D:X 


WHERE: 
S IS THE SOURCE DRIVE 
FFFFFFFF IS THE AMBIGUOUS OR NON-AMBIGUOUS FILENAME 
TTT IS THE AMBIGUOUS OR NON-AMBIGUOUS FILETYPE 
D IS THE DESTINATION DRIVE 
Xx IS THE DESTINATION SYSTEM — I=IBM-FORMAT 


M=MICROPOLIS 
FOR EXAMPLE, TO TRANSFER ALL '.COM' FILES ON IBM-FORMAT DRIVE B TO MICROPOLIS 
DRIVE A, YOU WOULD TYPE: 
A>MIC-XFER B:*.COM A:M 


WHILE EXECUTING, MIC-XFER WILL REPORT EACH FILENAME AS IT IS TRANSFERRED, 
AS WELL AS ANY ERRORS WHICH MAY OCCUR. AN ERROR ON ONE FILE OF A MULTI- 
FILE TRANSFER WILL NOT ABORT THE TRANSFER OF THE REMAINING FILES. EXECUTION 
AY BE INTERRUPTED BY STRIKING CONTROL-C, WHICH WILL BE RECOGNIZED AT THE 


y OMPLETION OF THE CURRENT FILE TRANSFER. 


“ 


Q> 


POLY-vu 
#PV119 


K&M Company 
=. CA 90503 


TORRANC 


>) 


(A 
is 


-CATALOGO10 1K 
ALS8CPM ASM 17K 
BLACKBOXBAS 3K 
BOGGLE BAS 1K 
DIV1I6B ASM 1K 
DSIM LIB 5K 
GAMMON' H19 11K 
GAMMONB BAS: 15K 
JOURNAL BAS 17K 
LANES BAS 6K 
NIM1 H19 8K 
NSCPM48 ASM 22K 
NSCPM48 DOC 8K 
OTHELLO H19 5K 
RETURN 48COM 1K 
REZ ASM 33K 
REZ COM 7K 
REZ DOC 26K 
REZ Z80 36K 
SIG/M LIB 2K 
STARWAR2H19 12K 


21 file(s). 
35 directory entries remaining. 
C>STAT O: 


SIGMUG vol. 10 10/19/85 


Bytes Remaining On O: 4k 


COTYPE O:-CATALOG.010 


SIG/M volume 10 


10.01 


10.02 


10.03 
10.04 
10.05 
10.06 
10.07 
10.08 
10.09. 
10.10 


10.11 
10.12 
10.13 


10.14 
10.15 
10.16 
10.17 
10.18 
10.19 


Cc> 


LANES.BAS 
JOURNAL. BAS 
GAMMONB.BAS 
BLACKBOX.BAS 
BOGGLE.BAS 
GAMMON.H19 
NIM1.H19 
OTHELLO.H19 
STARWAR2.H19 
ALS8CPM.ASM 


DIV16éB.ASM 
DSIM.LIB 
NSCPM48.ASM: 


NSCPM48.DOC 
RETURN48 .COM 
REZ.ASM 
REZ .COM 
REZ. DOC 
REZ.2Z80 


games, disassembler, North Star Basic patch 
for CP/M, CDOS simulator, and other utilities 


6K Games using MicroSoft Basic 

2K¥- 
15K 

3K 

1K 
11K Heath terminal adaptation 
8K 

5K 
12K 
17K - Converts Processor Tech assembler 

files to CP/M format 

1K 16 bit division by 8 bit divisor 
5K CDOS calls for CP/M 

22K Patches to run North Star Basic 

under CP/M 

8K 

1K 

33K RESOURCE resurrected with .ASM 

7K a nifty 8080 disassembler 
26K modified for 280 TDL op codes . 
36K modified for Zilog op codes 


THiS 13% Compute Gonmad (le brane 
a Arlee eee 


TYPE NSCPM:~&3.DOUC 
1.0 INTRODUCTION 


A special interface between North Star BASIC (Rel 4) and CPM (V1.4 and V2.0) 
has been implemented. This interface allows almost all of the North Star 
BASIC functions and capabilities to be used on any CPM system. With suitable 
patching, the interface will run on Cromemco CDOS (V1.07). The following 

two sections describe the interface and its use. 


2.0 NORTH STAR DOS TO CPM COMMAND MAPPING 


Assuming you are familiar with North Star DOS and CPM, the following commands 
are used in conjunction with the North Star BASIC (Rel 4) which runs on CPM: 


North Star DOS ; CPM 


A. List directory LI<Unit #> DIR (use Ctl-P 
toggle print) 


B. Create file CR 


(1) Type 2 None; creates & 
allocates disk 
space automatic- 
ally when you 
NSAVE in BASIC. 
Name will appear 
in directory as 
AAAAAAAA. 2 


(2) Type <>2 In CPM, save a 
dummy file to 
create file lengths 
of NNN blocks by 
using SAVE NNN 
AAAAAAAA.T where 
T=type. It's better 
to use CREATE in BASIC. 


C. Delete DE Use CPM's ERA 
command 


D. Compact co Not required. 
CPM takes care of 
this. Automatical- 
ly allocates & de- 
allocates type 2 
file space. 


E. Type TY Not required. See 
B. above. 


F. Load & execute GO None. All .COM 
program programs load & 
execute at 100H in 
CPM. 


G. Jump to address JP Not available in 
CPM 


H. Copy file CF Use PIP program. 
Use SYSGEN program 
for CPM 


T Pass A oh cn llse PIP & SYSGEN 


programs 


J. Read & write RD, WR Not available 
disk sectors 


K. Load & save file LF, SF Not completely 
available. Can do 
using DDT and SAVE 
in CPM. All SAVEs 
assume RAM address 
is at 100H; e.g., use .2 
& .3 extensions for 
type 2 & 3 files, 
respectively. 


L. Initialize disk IN Use a format program. 
Be careful; will 
destroy programs. 
M. Diagnostic DT Use disk test 
program. Be care- 
ful; will destroy 
all programs. 
3.0 NORTH STAR BASIC COMMANDS (REL 4) 
The following is a list of capabilities of the interface with BASIC: 
A. CREATE - Will create files by reserving disk space by saving dummy 
files of the size and type specified. This function will be slower than 
with North Star since in order to reserve disk space in CPM, you must actually 
save a file of the size specified. See item L. in the next section for the 
situation where the disk becomes full during a CREATE. BASIC has been patched 
to remove the file size limit of 350 blocks. The current limit is 4095 blocks 
which should suffice for 8" quad density. This allows up to a 1 Megabyte 
file to be created. -4096 (FO00H) has been patched into location DF7H. 
B. DESTROY - No change 
C. OPEN - No change 
D. CLOSE - No change 
E. READ - No change 
F. WRITE - No change 
G. FILE - No change 
H. SAVE - No change; file must already exist in the directory 
I. NSAVE - No change; use if file does not exist in directory 
J. LOAD - No change 
K. APPEND - No change 
L. RND(-1) - Will not generate a random number 
M. MEMSET and End of BASIC's Memory - MEMSET will give an ARGUMENT ERROR when 
you try to set the address at BPOS or above. The end address of memory is set 


te the beginning of EDCS-1 when BASIC is first loaded and executed. 


5 
N. BSPC ~ BASIC has been patched at 817H to echo the Backspace character Wy 
(CHT = ory 


O. LINECT ~- BASIC has been patched at 80EH to a line length of 132. 


4.0 SPECIAL FEATURES AND NOTES 


A. Drives 1 and 2 in North Star DOS/BASIC are synonomous with drives A and B 
in CPM. 


B. CPM does not allow you to SAVE a file larger that available memory. Thus 
if you have large data files to create, you must create several small files 
using the save technique above and concatentate them using the PIP concatena- 
tion feature. The size of the large file should equal the sum of the sizes of 
the small files. It is recommended that you create a file in BASIC using 
CREATE; it is easier to do. 


C. The interface has an added feature which allow you to freeze and unfreeze 
the screen using the Control-S toggle as in CPM while listing on the console 
device. 


D. Your CPM or CPM derivative must have a standard BIOS jump table up to the 
PUNCH device jump address and standard CPM BDOS calls. 


E. The CPM CONSOLE IN and OUT device is device number 0 in BASIC. 
F. The CPM LIST device is device number 1 in BASIC. 


G. The CPM PUNCH device is device number 2 in BASIC. One suggested use is 
as a list device with paging. 


EH. Make sure you do not have files in the directory with the same name and one 
character type. Except for LOAD, APPEND, SAVE and NSAVE, BASIC disk commands 
will work with the first directory entry with a matching name and ambiguous 
one character type. Types with more than one character will be ignored. 


I. The base or start address of BASIC is 800H (2048D). The interface starts 
at 100H. A jump table equivalent to that in North Star DOS starting at 200DH 
is at 103H. 


J. Data file directories are kept in a buffer which holds 10 open files. Thes 
files are purged on a FIFO basis. If new files are opened and the buffer is 
full, the oldest one is purged. Be careful that your program does not keep a 
file open any longer than is necessary. 


K. A disk full, directory full, or file extension error gives an ARGUMENT 
ERROR. 


L. When using CREATE and disk becomes full, the normal BASIC error message 

or error number will not be generated. This is because of the way the 
interface had to be implemented. When this occurs, the message 'DISK/DIR FULL 
will be printed on the- console, and the program will abort and return to CPM, 


M. The program RETURNP.COM can be used (e.g., in L. above) to return to BASIC 
without scratching the program. Just type RETURNP(cr). 


N. The program RETURNV.COM can be used (e.g., in L. above) to return to BASIC 
without scratching the program or the variables. Just type RETURNV(cr). 


O. The programs in M. and N. above put the appropriate jump (i.e., 804H and 
814H) into location 139H in the interface. 


P. To incorporate the turnkey start up of BASIC, 


1. Load and execute BASIC by typing NSBASIC(cr) ve 
2. Type 1000 CHAIN "program name"(cr) 


. Type DDT NSBAS4.COM(cr) 
- Type S&CF(cr) 
- Type O(cr) 

- Type .(cr) 

- Type Ctl1-C(cr) 


4 
5 
6 
7 
§ 
i) 
10.Type SAVE 60 NSBAS4.COM(cr) 


Type SAVE 60 NEPALS4.COM(cr) lor any program name.COM] 


© The program will now load and execute after loading and executing BASIC. 


Q. For those using CDOS V1.07, the following patches are required for 
compatibility; use DDT or DEBUG to patch; then SAVE 60 NSBAS4.COM: 


ADDRESS CURRENT CODE PATCH 
23DH 21H,89H,0,CDH,D4H,4 11H,9,6,195,0,0 
3A4H CDH,D1H,4 0,0,0 
3ADH CDH,D1H,4 0,0,0 
4B5H 21H,8FH,0,CDH,D4H,4 11H,OFH,0,19H,0,0 


These patches only apply to Revision @ of the interface. 


RETURNP. 


COM and RETURNV.COM need to be changed also. 


The easiest way is to 


use DDT or DEBUG after the above patches are applied and BASIC resaved. Load 
in BASIC using DDT; patch location 139H with JMP 804H or JMP 814H for 
RETURNP.COM or RETURNV.COM, respectively; exit DDT with a Control-C; then 
SAVE 1] RETURNP.COM or RETURV.COM. 


R. Revision 8 is identified by a period (.) preceeding the file type when 


doing a 


11/20/79 
° é 


CAT. All previous versions used a blank. 


TYPE REZ.DCC 

naa REZ ‘ 
A disassembler for 8080 programs:: | 
‘by Ward Christensen as modified for Z- -80 

2 with TDL mnemonics by William Earnest : 
with Zilog mnemonics by Hank Kee 


CP/M U.G. 1/80 


Suggestions? Call me eve's at (312) 849-6279 
W. Earnest is at (215) 398-1634 

REZ commands are inconsistent at best. - REZ is a 

kludge based on years of disassembler experience and hacking, 

and was never "planned" - just coded sitting at a tube, and 


modified over 2 years before being contributed to the CP/M UG. 


For example, to kill a symbol: k.label but to killa 
control value: caddr,k and to kill a comment: ;addr, 

but REZ does the job like no other I have seen. 

N-O-T-E: Pardon the editorial, but I feel hardware without 
good software is useless to 99% of us. Most good software 


has to be paid for. I strongly support the legitimate purchase 


of licensed software. I do not regularly use any programs 
which I have. not purchased. (Yes, I do occasionally "try" 
one, but then buy it if I plan on using it). I have been 
asked by software businesses to NOT distribute REZ - 
because of it's ability to produce good .asm source quickly. 
But, there are so many disassemblers out, why. not a. good, 
conversational one? Please use it in the. spirit in’ which it 
was contributed: to. enlarge your understanding of the micro- 
computer world around you, and to allow you to customize 
programs which you legitimately own, for your own-use.. 


"Semper. non rippus offus" 
NOTE: any command taking a hex address (Dnnnn, etc) 
may take a value in the form .label but arithmetic 
may not be performed. (i.e. d.start is ok, but d.start+8 not) 


Overall structure. of REZ: -It is a ~COM file, 


- which runs at 100H. It goes thru 1B00 or so, then the stack. 


At 1C00 is a 512 entry table for control commands. - Each is 
3 bytes long, and controls the format of the re-sourced list, 
i.e. is it .BYTE, .WORD, .BLKB instructions, etc. | 

At 2200 is the start. of the symbol table. It has no 
defined length as such. If it is not used, it occupies only 
2 bytes. 

If you want to re-source something which is in memory, 
such as a PROM, a. program previously loaded in high memory, 
"CP/M itself", or whatever, you can just do so. 

However, typically you want to disassemble a program 
which runs at 100H, which is. were REZ runs. Bob b 
Van Valzah would’ have solved that by making resource 
relocatable and moving itself up under BDOS. I wasn't that 
industrious. 

Instead, REZ uses the concept of an "invisible" 
OFFSET. After all, what do you care where it is as long 
as it LOOKS like it's at 100h? 

So, you set an offset. O2F00 sets it to 2F00 Hex. 
Reading a .COM file (RFOO.COM) causes it to come into 3000 on. 
If you say D100 or L100 it dumps or lists what LOOKS like your 
Program. Internally, REZ is adding the offset to the 
‘ al 


= a ee ol 


What should you set the offset to? Well, that depends 
upon how many symbols you will use. 02400 will load the 
program at 2400, thus allowing only 2200-23FF for symbols, 
i.e. 512 bytes or about 50-60 labels. If you didn't leave 
enough space, then used B to build a default symbol table, 
the table could run into and clobber your .com file! (easy 
recovery, however: just change the offset to being cg teats 
and read in the .COM file again) Each entry takes 3 bytes 
+ the symbol length, and if you like 7 byte labels like I 
do, that means 10 bytes/label. An offset of 3300 should 
be adequate. 

If you want to put comments into the disassembled 
program, you will have to designate an area to Use for the 
comments. The U command (e.g. U4000) specifies what area 
is to be used. 

Before issuing the O (offset) command, do: 

L5 7 
which will show the JMP to BDOS, which is the highest memory 
you may use. (Note if you have, for example, an empty 4K . 
memory board in high memory, you. can Use THAT for comments). 

Let's take an example: ‘You have an 8K file, FOO.COM 
which you want to disassemble. It will have about: 300 labels. 
300 x 10,:is 3000, or call: it 4K (what's'a K unless: your’ 
tight). The symbol] table starts at 2200. 4K more is 3200. 
Let's load the .COM at 3200,'so since it‘ normally starts: 
at 100H, the offset is 3100. 03100 is the command. 

We then RFOO.COM to. read’ it: in. . Tt says: 5200 2100 which 
means it. came into actual memory to 5200, but 2100 if we 
are talking with respect to loading at 100. 

Thus, we could set our comments table up after 
the .COM program - say at 5400: 0U5400 

The ? command shows the memory utilization for 
control, symbol, and comments entries.:' (no, I never! put-..- 
in anything to keep track of the, - COM = wee ii just have 
to do that yourself). Te «si 7% 

If you ever want to deine end memory, you'll have 
to reset the offset to 0: 00 but then set it back. 

If you are not sure what it is, typing O will tell the 
current offset. , 


Hoo, boy! Hope this kludge of documentation! : 
is enough to: get you going - hmmm, better give you 
some of the gotcha's I've discovered... 

---- WATCH FOR ---- 


* Symbols overflowing into the .COM. 
(Use ? command to see how full symbol table is) 


* Control entries overflowing into .SYM (altho I 
can't believe anyone. will have a program with 
more than 512 control entries!!!) 

* Comments overflowing into BDOS (ug!!) 


s Using an offset which is not in free memory 
and overlaying BDOS or whatever. 


() m The B(uild) command gobbling up too much when building 


a .BYTE: "B" will take a .BYTE 'GOBBELDY GOOK' followed 

by LXI H,FOO and take the LXI as a '!' (21H) so 

you'll have to manually stick a new "I" control 

entry. in at the address of the LXI. You might. 

also delete the incorrect "I" entry which REZ Ly 
stuck in (typically at the second byte of the LXI) L 


Trying to dump real memory without setting the 


offset back to 0. (then forgetting to set it back 
to its proper value) . 


Forgetting how big the .COM file you are disassembling 
was. 


Using REZ to rip off software (yes, I know, you 
heard that before, but only 3 in 100 needed to be 
told, and 2 in 100 needs to be told again, and 1 in 
100 doesn't give a rat's fuzzy behind anyway!!) 


Forgetting to take checkpoints when disassembling 
large files. You may even want to rotate the names 
under which things are saved: 


STEMP1.SYM 
STEMP1.CTL 
STEMP1 .DOC 


Missing a label: Suppose you have a control entry 
for a .WORD, resulting in: 


DFLT: 3172C 
«WORD 100H 


but somewhere in the program, the following exists: 
LDA 172DH 


Even if you did a B and have a label L172D, it won't 
show up since it's in the middle of a .WORD. Instead, 
do this: . : 


K.1172d kill the old. label 
e172d,.df1t+l1 put in the new label as a displacement 
off the beginning. 


improperly disassembling .WORD's. (see previous item). 
You might be tempted to make DFLT a .BYTE so that 


DFLT: ;172C 
-BYTE 0 

L172D: ;172D 
.BYTE 1 


Note that while this disassembles and reassembles 
properly, it is. not "as correct" as the technique 
used in the previous item. 


Having the "B" command overlay your "E" control entry. 
What? Well, "B"uild is pretty dumb. If he finds 8 

-BYTE type characters in a row, he fires off a .BYTE from 
then on until he runs out of those characters. Suppose 
your program was 200 long (ended at 3FF), and you 

had zeroed (aha! Nice .BYTE candidates) memory there 
(there meaning at your offset address + whatever). 


Then you QB100,400 and viola!! REZ overlaid 
your "E" control with a "B", 


REZ is relatively complete. (well, actually, 
the phrase "rampant featureitis" has been "mentioned"). 
..eBut there's always another day, and another K... 


SO... Here's my "wish list" 


eit might save you telling me YOU think such-and-such 
would be nice... 


Targets of LHLD, SHLD should automatically be flagged 
as type .WORD in the control table. Ditto LDA and STA 


as .BYTE or as second half of .WORD. Ditto targets of LXI 
as .BYTE (?). 


E5C,.FCB. 
followed by 

E6C,.FCB+ 
should automatically calculate the appropriate 
displacement, and put it in the symbol table. 


The comments facility should be enhanced to allow 
total SUBSTITUTION of entire line(s) of the code, 
i.e. at address such-and-such, replace the next 3 
bytes with the following arbitrary line. This 
would help those "how do I explain what was being 
done".cases such as: LXI H,BUFFER AND OFFOOH 


Add the ability to, in one instruction, rename 
a default (LXXXX) label to a meaningful name. 


REZ types an "*" prompt when it is loaded. You may 

then enter any of the following commands. Each command 

is a single letter followed by operands. Commas are shown 
as the delimiter, but a space will also work. 


Put comments into the program. 


(must execute ‘u' command first, to assign area 
for comments to be placed) 


=e 


jaddr,comment enter a comment 


saddr lists existing comment 
. 4 lists entire comments table 
saddr, deletes existing comment: 


note that '\' is treated as a new line, Ae ee 
\test\ will be formatted: 


Attempt to find .BYTE's while listing the program. 


This command works just like 'L', but attempts 
to find .BYTE's of 8 chars or longer. 


(see 'L' command for operand formated 
Eut8 default sym tbl (LXXXxX) labels. Soe each 

2 byte operand encountered. Note 'B' is 

identical to 'L' except labels are built. 


(see ‘L' command for operand formats) 


Control table usage: 


- c dump ctl tbl [es 
cnnnn dump from starting 4 
1 . v Aafine format friar. arr 


dump: 


to next entry. - values of x: 


B = .BYTE (attempts .ASCII if 
printable, ODH, OAH) 

-WORD (attempts: label) 

~BLKB to next ctl entry 

instructions 

kill this ctl entry 

end of disassembly 


BAHHM 
‘uw nu 


NOTE every control entry causes a "control break" 
(NO, REZ was NOT written’ in’ RPG) which! means 

a new line will be started. Thus if you have a 
string. in memory which disassembles as: 


~BYTE ‘Invalid operand’,0DH 
BYTE OAH 


You might want to change it putting the ODH,0QAH 
together on the second line - just enter a "B" 
control entry for the address of the ODH. 


The same technique could be used to make 
-ASCII 'TYPESAVEDIR ERA REN ' 

appear as 

eASCII ‘TYPE’ 

eASCII  'SAVE' 

eASCII 'DIR ' 

eASCII ‘ERA '' 

eASCII ‘REN '' 


Oxxxx Dumps 80H from xxxx on 
daaaa,bbbb Dumps from aaaa thru bbbb 
d,bbbb Continues, thru bbbb 

d . Continues, 100H more 


NOTE 100H is the default dump length. .If you have 
a larger display, you can change the default via: 


d=nn © nn is the HEX new default. 
For example, a 16: line tube could display 80H: 


d=80 Ore. 
d=80,200 Defaults to 80, dumps 200-27f 


enter symbol: 


ennnn,.symbol symbol may be of any length, 
and contain any char A-Z or 0-9, 
or "+" or "=", This allows: 
E5D,.FCB+1. Note the "+" is not 
checked, i.e. E5D,.FCB+2 would be 
wrong (assuming FCB is at 5C) but 
would be allowed to be entered. 


Note if you enter two symbols for. the same address, 
whichever one is first alphabetically will show up 
on the disassembled listing. If you have a label 
which has the wrong address, you need not explicitly 
ki 1 the old one hefore enterinre t:-ea ir6W BR lahel 


which is spelled exactly the same as an existing one 
will replace the existing one even if the addresses 


are different. 


Find occurrence of address or label. Note this function 
- runs until interrupted (press any key). 


fnnnn,ssss 
£ 
fnnnn 


kill symbol from table 
- k.symbol 


find address nnnn in memory. Start 
the search at ssss. Runs forever. 
Press any key to stop. 

continue previous find command 

find nnnn starting at address you last 
stopped at in the f command 


list (disassemble). This command is used to list the 
- file, or to list it to disk after enabling 
the .ASM, file save via 'SFILENAME.ASM'. command 


1 
Issss,eeee 
1,eeee 
lssss 


lists 23 lines from prev pc 
lists from ssss to eeee 

lists from current pc to eeee 
lists 23 lines at ssss 


Note that if you have a control ‘'e'’ entry, then the 
list will. stop when that address is found. This allows 
you to 'lstart,ffff'. 


The 23 line default may be changed via: 


=nn 


re) L=0f 


where nn is a HEX line count, e.g. 
set. to 15 lines/screen 


You can change the default and list, e.g. 


L=9,100 


Df1lt to 9 lines, list at 100. 


NOTE when using L to list the .ASM program to disk, 
you should either list the entire program at once 
using: Lssss,eeee or, you can list small pieces 

at a time. As long as you list again without 
specifying a starting address, (L or L,nnnn) then 
the output file will continue uninterrupted. 


You may do dump commands, and others, without 
affecting what is being written to disk. 


offset for disassembly 
- ° 
onnnn 


print current offset 
establish new offset 


(note the offset is always added to any 

address specified in an a, b, d, or 1 command. 
to dump real memory, the offset must be reset to 
0 (00) before the dump.) 


prolog generation - this routine generates an 
«] = »LOC instruction, and equates for any label 
outside of a given low-hi address pair. 
(the start and end addresses of your program). 
e.g. if disassembling from 100 to 3ff, it will 


generate 'fcb 


5ch' if FCB is in the symbol 


table. In typical use, you would 'sfilename.asm' (<4 
then use the P command to write the prolog, then é 
ge a eg — ;.< ge oe Fee + 


.? *: 5 


Pstart addr,end addr 


quiet command: any command which is preceeded by a q 
- will be done 'quietly'. For example, to save 
a .asm program, you could just do: 


g1100,3ff or qll00,ffff if you have 
set the 'e' control in the control table. 


Another use is to build a default symbol table 

by taking a pass thru the program: QB100,xxxx 
read .com, .ctl, .sym, or .doc file 
= rfilename.com reads in at offset+100h 

rfilename.ctl loads the ctl table 

rfilename.sym loads the sym file 

rfilename.doc loads the comments table (note 

‘u' command must have been issued) 


Save .asm, .ctl, .sym, or .doc file 

- sfilename.asm use '1' command to write, z to end 
sfilename.CTL saves the CTL table 
stablename.sym saves the sym file 
sfilename.doc saves the comments table 


use area of memory for comments table 
= unnnn such as ud000 if you had an 
open board at 0d000h 


purge sym tbl and CTL tbl 
. x 


Close .asm file (note that a preferred way to close the 
easm file is to have specified a control entry 
for the end address (e.g. clff,e)) 


Here is a sample of the REZ usage. 


Given: a COM file (lets say test.com) which runs at 100 
(as any good COM file should), and goes thru 2FF. 


lines preceeded with ---> are typed by you. 
~-~> REZ 
---> 02600 set the offset to 2600, which means the 


program will read into 2600 + 100 = 2700. 


---> rtest.com reads the com file into memory. system says: 
2900 0300 which is the actual hi load addr, 
(2900) and the original hi load addr (300) 


REMEMBER this address (300) because you might 


want to put a "E" (end of assembly) control 
entry there. 


<<<<note>>>> that all 'L' (disassembly list) and 'D' (dump) 
commands work with the offset added. Thus, you 
should learn to forget that the disassembler is 
in memory, and think of it as if your program were 
actually at 100. D100 will dump your program. 


ee 


also note: if the program being "REZG" will 

have a fairly large symbol table, then you will 

have to set the offset higher: 03300 or some such. 
(the ? command will show symbol table usage: if your 
symbol table is nearing the .com file, then just 

set a new offset (higher) and re-load the .com) 


if you want to dump r-e-a-1 memory, you would have 
to reset the offset to 0: 00 (but don't forget to 
reset it to 1f£00 before continuing with your progran.) 


If you are disassembling something which is in memory at 
it's correct address (such as looking at ccp) then don't 
set the offset. It defaults to 0 when dis is first loaded. 


ama5 1100 list your program - lists "about" 10 lines. 
===> d100 do a dump of your program. 


NOTE that typically here are the steps to disassembling 
a program which has just been read into memory: 


Use the dump command to find the .ASCII areas. 


Note that the 'a' command may be used to automatically 
find the .BYTE's, but you must then check them to insure 
that they don't extend too far. All printable characters, 
Odh, Oah are considered candidates for .ASCII . 


At least 8 characters in a row must be found to make sure 


that long sequences of mov instructions won't be taken 
as .BYTE's. 


Use the cnnnn,k command to kill erronious entries put 
in the control table by the a command, but then immediately 
put in the right address, such as via cnnnn,i 


if you wanted to scan the program for .ASCIIs yourself, 

use the 'c' (control) command to set the beginning and 
end of ascii areas. For example, a program 
which starts out: 

0100 jmp start 

0103 eASCII ‘copyright .....' 

0117 start ei shane 


would show up in the dump as: 


0100 ©3170144 4£50xxxx xxxxxxxx xXxxxxxxx *...copyr ight....* 
0110 xxxxxxxx XXXXXXXX XXXXXXXX XXXXXXXKX *XXKXXXXXX * 


thus you would want to instruct the disassembler to switch 

to .ASCII mode at 103, and back to instruction mode at 117, thus: 
c103,b 
c117,i 


Continue doing this, bracketing every .ascii which is in 
the middle of instructions, by a b control instruction 

and an i control instruction. Note that multiple db's in 

a row need not have separate cnnnn,b instructions, but that 
these do cause a 'line break', i.e. if you have a table 

of ascii commands, for example: 


02e5 eASCII ‘load’ 
02e9 -ASCII 'save' 


the disassembler would disassemble these as: 
02e4 eASCII '‘loadsave' 


you could put in an additional control entry: ¢c2e9,b, which 
would cause the disassembler to generate: 


02e4 eASCII ‘load! 
02e8 -ASCII 'save' 


which is much more readable and realistic. 


Note that before generating each byte of a db, a symbol 
table lookup is done to determine if there is a label 
at that location, and if so, a new line is started. 


Thus if 'loadlit' and 'savelit' were in the symbol table, 
as the labels on the 'load' and 'save' above, no separate 
‘b' control instruction would be required as the label 
would cause the break. 


<<<<NOTE>>>> that at this time the automatic label checking 
is n-o-t done for .BLKB instructions. Make sure that each 
ds instrucion references only up to the next label. This 
means that multiple .BLKB's in a row must each be explicitly 
entered into the control table. Presence of a label is 

not sufficient. 


steps, continued: 


After building the control entries with cnnnn,b and cnnnn,i 

put in a control entry cnnnn,e which defines the address of 

the end of your program. The 1 command will then automatically 
stop there, and in addition, if you are in 'save xxx.asm' 

mode, the output .asm file will be closed. If you do 

mot define a control ‘e' entry, then you will have to use 

the break facility to stop the 1 command (don't use control-c 
as that will re-boot cp/m). If you were writing an .asm 

file, you would have to user the z command to close the 

file. 


Next, you would list your program to determine how it looks. 
when you recognize a routine by it's function, insert a label. 


For example, if you saw that location 7ef was a character 
out routine (type) then enter a label into the symbol table: 
E7EF,.TYPE 


NOTE that all symbols start with a '.', so as to be dis- 
tinguished from hex data. 


NOTE that if you want the disassembler to make default labels 
for you, use b (for build labels) instead of 1 (for list 
program). The b commands causes Innnn default labels to 

be inserted in the symbol table for every 2 byte operand 
encountered (LXI, SHLD, JMP, etc). It will undoubtedly 

Make some you don't want, such as L0000. You will have to: 


K.L0000 kill label L0000 from the table. 


When you encounter data reference instructions, try 

to determine what type of area the instruction points to. 
Typically,, LXI instructions may point to a work area 
which should be defined as a .BLKB, or to an ASCII string, 
in which case we will have already made it a 'b' control 
instruction. Operands of LHLD and SHLD instructions 
should ho e= le .WORD instructions. For evamn e ~ 7 wan 


af 


encounter LHLD 0534H, then issue a control instruction: 
C534,W 
NOTE that whatever mode you are last in will remain in 


effect. Therefore if 534,w is the last entry in the 


control table, all data from there on will be taken to be 
-WORD'sS. 


Suppose that you determine that address 7cf is a 128 byte 
buffer for disk I/O. You want it to disassemble to: 


DKBUF 707CF 
-BLKB 80H 


You do this as follows: 


C7CF,S to start the .BLKB 
C84F,B to define it's end, and 
E7CF,.DKBUF to put the symbol in the table. 


Continue, iteratively using the '1' command and the 'c' 
and 'e' commands until you have the listing in a nice 
format. You will then probably want to save the control 
symbol, and comments tables. Or, you could have been 
saving them at checkpoint times (so if you make a 

major mistake you could go back to a previous one). 


To save a control file: 
sfilename.CTL (any filename, may include a: or b:) 


To save a symbol file: 
sfilename.sym 


To save a comments file: 
sfilename.doc (not ".com" of course) 


NOTE that the filetypes must be used as shown, but 


that any legal filename (or disk:filename such as b:xxxx.CTL) 
may be used. 


You could now control-c to return to CP/M, and come back 
later to resume your disassembly: 


REZ 

02200 

rtemp.com 

rtemp.sym 

rtemp.ctl 

UXXXX (such as 14000) 
rtemp.doc 


This will take you back exactly where you left off. 


If you want to save a .asm file out to disk, do the following: 


Make sure that there is a control entry defining the end 

of the program (such as c200,e) or else you will have to 
specify the ending address and manually type a z command to 
Close the file. 


sfilename.asm 


A message will indicate that the file is opened. Any 


Subsequent a, by or 1 command will have whatever is listed 
wr cto: ab Mon: -@ trig qa teat «ewn.. 


a rere *- 3 o& 


command will then close the .asm file. The listing may 
be interrupted, and continued. Since the 1 command types 


only 23 lines, use laddr,ffff to list thru the end of the 
assembly. 


If this is the 'final' save of the .asm file, you will 

probably want to put an 'org' at the beginning of the 
re] output file, as well as generate equ instructions for 

any references outside of the program. For example, a 


typical cp/m program will have references to: 
bdos at 5 


fcb at 5ch 
tbuff at 80h 


the 'p' (for prologue) command generates the org, then 
scans the symbol table and generates equates: 
BDOS 05H 


FCB = 05CH (etc.) 


If you have a "e" control entry in your file, you can 
list as follows: laddr,ffff - the listing will continue 
until the "e" control entry is found 


additional commands: 


if you entered a label in the symbol table but now want 
to get rid of it: 
k.symbol 


note to rename a symbol, such as when you had a system- 
r+] assigned Innnn label but now want to make it meaningful: 


k.10334 
e334,.type 


you could even: 
e.10334,.type 
k.10334 


but that takes more typing. 


here are some more commands: 


? prints statistics on symbol and control table 
usage, etc. 

c prints the entire control table 

cnnnn prints the control table starting 


at address nnnn 


ds dumps the symbol table. Interrupt it 
by typing any key. 


re] ds.symbol starts dumping at the specified symbol, 

: or the nearest symbol. thus "ds.f" starts 
the dump at the first label starting 
with the letter 'f', 


t Toggles format mode such that labels are 
placed on the same line with the next if 
instruction or are on t+ ei: awn line 


--eehave fun, and let me know of any problems or 
suggested improvements 


ee ee 


REZ 


"Quick" command summary 


Any address may be replaced by .symbol i.e. D.START 


saddr,comment 
saddr 


i 
saddr, 


A(see "L" for operands) 
B(see "L" for operands) 


Cc 
Cnnnn 
Cnnnn,;x 
Dxxxx 
Daaaa,bbbb 
D,bbbb 

D 


D=nn 

Ds 

Ds.symbol 
Ennnn,.symbol 
Fnnnn,ssss 

F 

Fnnnn 
K.symbol 

L 

Lssss,eeee 
L,eeee 

Lssss 

L=nn 

O 

Onnnn 

Pstart addr,end addr 
Q 


Rfilename.COM 
Rf£filename.CTL 
Rfilename.SYM 
Rfilename.DOC 
Sfilename.ASM 
Sfilename.CTL 
Sfilename.SYM 
Sfilename.DOS 
T 

Unnnn 


Enter a comment 

Lists existing comment 

Lists entire comments table 
Deletes existing comment 
Attempt to find .BYTE's 

Build default sym tbl (Lxxxx) 
Dump ctl tbl 

Dump ctl starting at nnnn 
Define format from nnnn (B,E,I,S,W) 
Dumps 80H from xxxx on 

Dumps from aaaa thru bbbb 

Dump thru bbbb 

Dump 100H more 

nn= Hex dump size default. 
Dumps the symbol table. 

Sym dump starting at .symbol 
Enter symbol into table 

Find address nnnn starting at ssss 
Continue previous find command 
Find nnnn 

Kill symbol from symbol table 
Lists 23 lines from prev pc 
Lists from ssss to eeee 

Lists from current pc to eeee 
Lists 23 lines at ssss 

nn is hex list default # of lines 
Print current offset 

Establish new offset 

Generate program prolog 

Before any command suppresses 
console output: QB100,200 
Reads in at offset+100h 

Loads the ctl table 

Loads the sym file 

Loads the comments table (note 
Save .ASM file. Write w/L, 2 to end 
Saves the CTL table 

Saves the sym file 

Saves the comments table 
Toggles trimmed format mode 
Use nnnn for comments table 
Purge all symbols and control 
Write eof to .ASM file ( 


Prints statistics (sym, ctl, comments) 


POLY-vu 
#PV 149 


K&M Company 
TORRANCE.CA 90503 


ed 


SIGMUG vol. 11 6/12/85 


~CATALOGO11 1K 
ABSTRACTO11 1K 
ADV COM 36K 
ADVI DAT 31K 
ADVI PTR 4k 
ADVT DAT 105K 
ADVT PTR 15K 
SIG/M LIB 2K 
8 file(s). 


. 47 directory entries remaining. 


A>STAT O: 
Bytes Remaining On O: 46k 


A>TYPE -CATALOG.011 
SIG/M volume 11 (supercedes SIG/M volume 3) 


Expanded ADVENTURE 8080/Z80 version supercedes SIG/M volume 3. 
This version will sense the type of processor (Z80 or 8080) and 
take advantage of 280 instruction set if available. 


NUMBER SIZE NAME COMMENTS 


-CATALOG.011 CONTENTS OF SIG/M VOL. 11 
ABSTRACT.011 NOTES ON EXPANDED ADVENTURE 


1.1 36K ADV. COM 

1.2 105K ADVT.DAT 
1.3 31K ADVI.DAT 
1.4 4K ADVI.PTR 
1.5 15K ADVT.PTR 


*** BEWARE OF ZORTON *** 


O>TYPE ABSTRACT.011 


This is an expanded version of Adventure. This one has a cave 
that is twice as large (it's a 550 point version). All of the features 


of the original adventure are in this version, plus a whole bunch of 


new rooms, treasures, and ways for the bumbling explorer to get oneself 


killed. 


Mike Goetz (NYACC) who adapted the original version of Adventure 
for CP/M (SIG/M volumes 1, 2, and 3) has released this expanded version 


to the SIG/M group for non-commercial distribution. 


O> 


ADV 


Welcome to the *new*® Adventure! Say "NEWS" to get up-to-date 
game details. 


Would you like instructions?YES 


Somewhere nearby is Colossal Cave, where others have found fortunes in 
treasure and gold, though it is rumored that some who enter are never 
seen again. Magic is said to work in the cave. I will be your eyes 
and hands. Direct me with commands of 1 or 2 words. I should warn 
you that I look at only the first six letters of each word. 

(Should you get stuck, type "HELP" for some general hints. For info- 
mation on how to end your adventure, etc., type "INFO", ) 


If you have any problems, please contact Mike Goetz at (212) 671-2490. 


You are standing at the end of a road before a small brick building. 
Around you is a forest. A small stream flows out of the building and 
down a gully. 

>NEWS 


This is the brand-spanking-new B01 version of Adventure. 

The cave is essentially stable at this point except for bug 
fixes being done as needed. The cave is almost twice as big as 
before, and has lots of new creatures in it - have fun! 


Please contact Mike Goetz at (212) 671-2490 if anything weird happens 
(that is, anything weird that looks like it shouldn't happen). In 
particular, if you ever see the message "Glitch!", please save 

the printout for error analysis if that's possible. 


> INFO 


If you want to end your adventure early, say "QUIT". 

To suspend your adventure such that you can continue later, say 
"SUSPEND" (or "PAUSE" or "SAVE"). To re-start your game at a later 
time, start up a new adventure and after I say "You are standing...", 
you must say "RESTORE". You can also name your game by saying 
"SUSPEND mine" (and "RESTORE mine") where "mine" is the name that 

you wish your suspended game to be known by (1-4 characters). 

To see what hours the cave is normally open, say "HOURS". 

To see how well you're doing, say "SCORE". To get full credit for a 
treasure, you must have left it safely in the building, though you get 
partial credit just for locating it. You lose points for getting 
killed, or quitting, though the former costs you more. There are 

also points based on how much (if any) of the cave you've managed to 
explore; in particular, there is a large bonus just for getting in (to 
distinguish the beginners from the rest of the pack), and there are 
other ways to determine whether you've been through some of the more 
harrowing sections. . If you think you've found all the treasures, just 
keep exploring for a while. If nothing interesting happens, you 
haven't found them all yet. If something interesting *does* happen, 
it means you're getting a bonus and have an opportunity to garner many 
more points in the master's section. I may occasionally offer hints 
if you seem to be having trouble. If I do, I'll warn you in advance 
how much it will affect your score. To save paper, you may specify 
"BRIEF", which tells me never to repeat the full description of a 
Place unless you explicitly ask me to by saying "LOOK". If you 


are an experienced adventurer, you may wish to specify "FAST", which 
is libe mir © Hut more so: in "FAST" mode T will *never® under 


any circumstances give the full description of a place, Finally, if 
you are in "BRIEF" or "FAST" modes, you may return to the normal mode 
of operation by saying "FULL". 


>HOURS 
Colossal Cave is open during the following hours: 


ALL the time!!! We *never*® close. 


>HELP 


I know of places, actions, and things. Most of my vocabulary 
describes places and is used to move you there. To move, try words 
like FOREST, BUILDING, DOWNSTREAM, ENTER, EAST, WEST, NORTH, SOUTH, 
UP, or DOWN. I know about a few special objects, like a black rod 
hidden in the cave. These objects can be manipulated using some of 
the action words that I know. Usually you will need to give both the 
object and action words (in either order), but sometimes I can infer 
the object from the verb alone. Some objects also imply verbs; in 
particular, "INVENTORY" implies "TAKE INVENTORY", which causes me to 
give you a list of what you're carrying. The objects have side 
effects; for instance, the rod scares the bird. Usually people having 
trouble moving just need to try a few more words. Usually people 
trying unsuccessfully to manipulate an object are attempting something 
beyond their (or my!) capabilities and should try a completely 
different tack. To speed the game you can sometimes move long 
distances with a single word. For example, "BUILDING" usually gets 
you to the building from anywhere above ground except when lost in the 
forest. Also, note that cave passages turn a lot, and that leaving a 
room to the north does not guarantee entering the next from the south. 
Good luck! 


>LOOK 
You are standing at the end of a road before a small brick building. 


Around you is a forest. A small stream flows out of the building and 
down a gully. 


“Cc 

O>A; 

A;? 

O>D 0 

D? 

O>A: 

A>D 0: 

-CATALOGO11 1K 
ABSTRACTO11 1K 
ADV COM 36K 
ADVI DAT 31K 
ADVI PTR 4K 
ADVT DAT 105K 
ADVT PTR 15K 
SIG/M LIB 2K 
8 file(s). 


47 directory entries remaining. 
A> 


POLY-vu 
#PV119 


K&M Company 
=. CA 20503 


TORRANC 


> 


] 


~CATALOG012 
CAT COM 
CATALOG SRT 
MAST CAT 


WIDE COM 
10 file(s). 


1K 
1K 
23K 
34K 
24K 
24K 
24K 
24K 
2K 
1K 


SIGMUG vol. 12 12/10/85 


47 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 83k 


C>TYPE -CATALOG.012 


SIG/M volume 12 


number name 


12.1 CATALOG.SRT 
12.2 CAT.COM 


12.3 MAST.CAT 
12.4 WIDE.COM 


12.5 P4 
12.6 P5 
12.7 P6 
12.8 P7 
c> 


cross reference index of CP/M UG volumes 1-47 
and SIG/M volumes 1-11 


size description 


23K cross reference of CP/M VOLUMES 1-47 
1K and SIG/M VOLUMES 1-11 
34K / 

1K / 

24K / 

24K / 

24K / 

24K / 


1YPE FUT. e Ib 
| FORTH .DOC 


NOTE from CALAMITY CLIFFS COMPUTER CENTER —- 9/1/80 


The FORTH11.ASM file as it stands is apparently set up to run on a 
HEATH system. We have no information on the function of any of the 
labels in the source listing, and as there is no (for very little) 
useful commenting in the source listing regarding what code is hard- 
ware dependent and how it should be modified for use on other systems, 
we offer this program with the advice: 


wee CAUTION >>>> CAVEAT EMPTOR <<<< CAUTION *##### 


Before attempting to use or modify the program, it is advised that the 
complete documentation be procured from the FORTH INTEREST GROUP. In 
addition it might be a good idea to contact Rick Schaeffer for clari- 
fication concerning the uncertain function of much of the code in the 
program. The only thing that we can attest to at the present time is 
that we have successfully assembled the code, as you see it here, with 
the CP/M 2.2 Digital Research assembler without error. We have not 
tried to run the program, as the hardware dependencies have not been 
identified with certainty. In addition, we have no idea whether or not 
it will run successfully under CP/M 2.2. 


-Calamity Cliffs Computer Center 


THIS DOCUMENTATION SUPPLEMENTS THE ASSEMBLER SOURCE FOR FIG-FORTH WHICH 
RESIDES HERE AS FORTH11.ASM. THIS SOURCE IS PROVIDED THROUGH THE COURTESY 
OF THE FORTH INTEREST GROUP, P.O. BOX 1105, SAN CARLOS, CA. 94070 

ND WAS ENTERED AND DEBUGGED BY RICK SCHAEFFER, 2011 AZTEC DR. BLACKFOOT #1 
ORTH LITTLE ROCK, AR. 72116. 


THIS COPY OF FIG-FORTH HAS BEEN DE-BUGGED IN THAT IT IS RUNNING ON MY 

H8 SYSTEM UNDER CP/M VERSION 1.43. AFTER SEVERAL ABORTIVE ATTEMPTS, 

I SUCCEEDED IN DOWN LOADING IT TO MICRONET BUT I HAVE NO WAY OF KNOWING 
IF THERE WERE ANY ERRORS IN TRANSMISSION SINCE I DO NOT HAVE ANY WAY 

OF HAND SHAKING WITH MNET. ON THE VERSION THAT I HAVE RUNNING, I HAVE 
CHANGED SOME OF THE ADDRESSES TO MAKE ROOM FOR MORE DISK BUFFERS, HOWEVER, 
THIS COPY IS INTACT AS PRINTED IN THE FIG-FORTH ASSEMBLY LISTING. THIS 
SHOULD MAKE IT RELATIVELY EASY FOR INTERESTED USERS TO GET THE SYSTEM RUNNING 
EVEN IF SOME OF THE DATA WAS LOST IN TRANSMISSION BECAUSE THE ASSEMBLED 
ADDRESSES SHOULD BE THE SAME AS THEY APPEAR IN THE FIG LISTINGS (THIS IS 
FOR FIG-FORTH VERSION 1.1....BY THE WAY). YOU SHOULD HAVE THE FIG 

MODEL MANUAL AND THE FIG ASSEMBLY SOURCE LISTING BEFORE ATTEMPTING TO USE 
THIS, HOPEFULLY, AT LEAST THIS SAVES A *LOT* OF TYPING FOR SOMEONE! 

GOOD LUCK! 

RICK SCHAEFFER (70120,174) 


OK 


O> 


TYPE HELP.DOC 


Program HELP 
SOURCE LANGUAGE CP/M ASSEMBLER.. HARDWARE REQUIRED CRT 24x80.. 
MEMORY REQUIRED Depends on HELP File Loaded (56K Max).......... 
DESCRIPTION OF WHAT IT DOES: 


HELP is a program which provides an interactive online documen 
tation system. With the supplied HELP Files, HELP displays selected sec 
tions of the HELP Files to the user one screen display at a time. All 
output is oriented for display on a 24 line x 80 column CRT. 

Two types of HELP Files are supported by the HELP program. These 
are indexed and non-indexed. With a non-indexed HELP File, HELP displays 
the entire file to the user one screen-display at a time. With an indexed 
HELP File, HELP displays a menu of the sections of this HELP File to the 
user and allows him to select an item. Single-character input is employed. 
Once selected, HELP jumps to that section and displays it one screen-display 
at a time. 

The user may return to CP/M at any time, and with an indexed HELP 
File may return to the menu at any time. The file HELP.HLP tells the user 
how to write his own HELP Files. 

All HELP Files have a name of the form 'filename.HLP'. 


HOW TO USE IT: 
HELP is invoked by CP/M commands of the following forms -- 


HELP 
HELP d:filename 


The form without a file name simply gives a basic built-in intro 
duction to the HELP program if the file HELP.HLP is not on this. disk. If 
HELP.HLP is on this disk, it is read and displayed. The second form dis 
plays the contents of the indicated HELP name 'filename.HLP'. The disk 
drive parameter 'd:' is optional. 


SPECIAL NOTE: The HELP command and some of the associated *.HLP 
files supplied with this submission are being distributed with products 
marketed by Supersoft Associates of Champaign, IL. I am the author of the 
enclosed programs and *.HLP files. I am placing them in the public domain; 
these programs and *.HLP files are simply being included in marketed 
packages and not being sold of and by themselves. 


Program HELP (Details on another disk) 

Program PHELP 

Library SYSLIB 

Program ABORTSUB 
SOURCE LANGUAGE M80 Assembler HARDWARE REQUIRED Hard Copy 
MEMORY REQUIRED Varies with HELP File (56K Max) wssecsccveceees 


DESCRIPTION OF WHAT IT DOES: 
PHELP is a companion to the HELP program (also submitted to 


_ SIG/M). PHELP prints the contents of a HELP file on the CP/M LST: device. 


The output is paged, each page containing one screen display as it would 
be generated by the HELP program. 
ye 


HOW TO USE IT: 
ww 


PHELP is invoked by the following CP/M command line -- 


PHELP d:filename <header text> 
PHELP will print the indicated HELP File named 'filename.HLP'. 
The disk specification 'd:' and the <header text> are optional (header 
text need not be enclosed in angle brackets). Internal to the PHELP 
program are the specifications of the user's printer. It is set for a TTY 
Model 43 as I submitted the program, and PHELP must be reassembled to 
change these settings (51 physical lines/page, 40 text lines/page). 


SYSLIB is the library I designed which must be used to assemble 
PHELP with M80. Use the indirect command file 'MASM.SUB' to do this: 


SUBMIT MASM PHELP 


The routines in SYSLIB are described in the HELP file 
SYSLIB.HLP. 


ABORTSUB is a program required by MASM.SUB. It permits abnormal 
termination of a SUBMITted file. Issue the following command for more 
information: 


ABORTSUB /? 


SIGNED Richard Conn weccccccccccscces 


DATE 4 Feb 81) wccccccccvccvessccscces 


ABORTSUB /? 
C> 


O> 


wey 


TYPE MITSUNVT.DUC 
This element contains the documentation for MITSCNVT. 


MITSCNVT is a program which operates under CP/M and enables the 
user to list the directory and convert MITS ALTAIR (TM Pertec 
Computer Corp) disk files to CP/M files. The reason conversion 
is required is that the disk formats are different and that the 
Qputarr DISK is a hard sectored disk which contains 32 sectors of 
137 bytes each per track. A CP/M compatable disk is soft sectored 
and is composed of 28 sectors of 128 or 256 bytes each sector. 


The ALTAIR disk is capable of containing a 255 entry directory on 
each disk and each directory entry "points" to a threaded list of 
sectors. In order to ensure the integrity of the threaded list, 
each sector in the list contains a single byte which is the "file 
number" - an integer calculated from the locus of the directory 
entry. If, during operations on the chain, the file number 
changes a ‘file tink error' is given and the program aborts. The 
calculation for the file number is given erroneously in the MITS 
documentation and is corrected here: 


8*SECTOR+(SLOT+1 ) 


Where SECTOR is the directory sector number (0-31) in which the 
file name is found and SLOT is the group number of a 16 byte 
wide directory entry of the format: 


Bytes Description 
00-07 ASCII File Name —- if the first character is a 
zero (binary zero) the entry is ignored. If 
it is Off (all one bits) this is the last entry 
oO in the directory. An ignored entry is the 
result of deleting a file in the MITS directory. 


O8 Track address of the first sector in the file. 
Track O-5 are never used as they are 'system' 
tracks. Track 70 is the directory track. 


09 Sector number of the first sector of the file. 
Sectors are always 0,8,16 or 24. Sectors are 
allocated in groups of eight. There is no 
pattern for it, but, because of latency consid- 
erations odd numbered sectors are 16+sector number 
AND 1Fh away from the even sector in a logical 
sense. My calculations indicate this is a poor 
choice and if you have ever heard ALTAIR Disk 


Extended Basic or DOS run, you'll know its not 
too good. 
10 Flag to indicate file organization — 4=random 


2=sequential 


11-15 Wasted bytes NOTE: at one time or another the 
program MITSCNVT uses these bytes to store some 
information about each file -not on the disk 

but in memory. 


As an example let me use the file &OCTBIN for 
illustration purposes. It -— quite arbitrarily —- will be assumed 
to start in track 72 sector 0. This would be its directory entry 
if it were a sequantial file: 


f this were the 5th entry in directory sector zero it would file 
number 5. 


format 


Moving along in the example each data file begins with a 
in which the data are embedded. 


The format is as follows: 


01 


02 


03 


oe" 


O05 


O6 


07-134 
file 


Description (For Sequential files) 


Track number +80h. This high order bit must be set 
for every track number. The physical track is 
identified in every sector on that track in this 
manner, 


Physical sector number of each sector. Every sector 
is identified this way. Sectors are numbered 0-31. 


File number. If =0 then this sector is NOT in use 
at this time. (When a file is deleted you have to 
wait for each sector in the chain to be rewritten so 
that the file number can be set to zero). 


Number of data bytes written in this sector 


Checksum of all data in the sector except bytes 0,1,4 
and 186. Byte 135 is also not used in the checksum 
calculation. The checksum is the sum of all of the 
data without regard to overlow as done in an eight bit 
register. 


Track number of the NEXT data sector in the chain. 


Sector number of the next data sector in the chain. 
If track and sector number are both zero there is no 
more file (EOF). 


128 words of data. If the first byte is ffh then the 
is binary. If the first byte is other than ffh_ 

then the file is ASCII. The first byte is the 

first byte of the first sector of the file — not the 
first byte of any sector, 


Check byte —- always ffH. This is used to ensure that 
everything else in the sector was in the right place. 


Each of the bytes in these sectors are linked to the 


other sectors in a "forward" direction until bytes 5+6 are zero. 
This signals that the current data block is the last block in the 


ile. 


The directory sectors are tocated in track 70. Each 


~ directory sector begins in the 8th byte of the physical sector 
(the first 7 bytes are garbage). 


USE OF THE PROGRAM: 


Soe eae ce a 


ve 


ob 


The program accepts two types of input. Ihe first type 
of input is a disk number prefixed by an equals sign. This will 
result in recovery of the MITS directory on that disk and the 
listing of that directory. As an example: 


=5 
a result in selection of disk 5 and the recovery of the 
directories on that disk which will be listed. 


The second type of input is a CP/M file name followed by 
a file type, an equal sign and a MITS file name and disk number. 
This will search the directory on the specified MITS disk, locate 
the file and write it on the CP/M disk specified. As examples: 


(1) CPMFILE.MIT=ZCTABLE,O 
(2) DIET.BAS=DIET,O 
(3) OCTOCT.ASM=SOCTOCT,2 


In example (1) the file 'ZCTABLE' located on MITS disk zero is 
copied onto the CP/M disk as file CPMFILE.MIT. In the next 
example, (2), file DIET on disk zero is copied to CP/M file 
DIET.BAS. In the last example, MITS file &OCTOCT on MITS disk 
two is copied to CP/M file OCTOCT.ASM. Thus the MITS files are 
always on the right side of the equals sign and the CP/M files 
are on the lteft hand side. Note that an ambiguous file name is 
not permitted because the CP/M files are open for writing. 


Because the files are accepted in list form, the program 
may be used as a submit job. Problems with this program may be 
submitted in writing to the author. The program is copyright 
1981 by the author. Use is permitted in a non-commercial 


eo Commercial use licenses may be obtained from the 
author at a reasonable cast. Conversions can be performed 
between other hard sector formats and cp/m format. Contact us 


for details. 

CP/M IS A TRADEMARK OF DIGITAL RESEARCH, PACIFIC GROVE CA. MITS, 
ALTAIR, PCG MAY BE REGISTERED TRADEMARKS OF PERTEC COMPUTER 
CORP., CHATSWORTH CA. 


Q> 


K&M Company 


TORRANC 


! 


> 


POLY-vu 
#PV119 


. CA 99503 


-CATALOG013 
ABORTSUBCOM 
ENTAB ASM 
ENTAB COM 
FORTH11 ASM 
FORTH11 COM 
FORTH11 DOC 


HELP ASM 
HELP COM 
HELP DOC 
LOOPBAKI1BAS 
MASM SUB 
MITSCNVTASM 
MITSCNVTCOM 
MITSCNVTCPM 
MITSCNVTDOC 
MITSCNVTHEX 
PHELP COM 
PHELP MAC 
sD COM 
SD-2/6 ASM 
SIG/M LIB 
More.. 

SYSLIB HLP 
SYSLIB REL 
UTIL FOR 


25 file(s). 


SIGMUG vol. 


32 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 11k 


C> 


13 


10/8/85 


TYPE O:-CATALOG. 013 


SIG/M volume 13 


number 


13.1 
13.2 
13.3 
13.4 
13.5 


13.6 
13.7 
13.8 
13.9 
13.10 
13.11 
13.12 
13.13 
13.14 


13.15 
13.16 
13.17 
13.18 
13.19 
13.20 


13.21 
13.22 
13.23 


C> 


name 


MITSCNVT.ASM 
MITSCNVT.COM 
MITSCNVT.CPM 
MITSCNVT.DOC 
MITSCNVT.HEX 


ABORTSUB.COM 
HELP.ASM 
SYSLIB.HLP 
SYSLIB.REL 
HELP.COM 
MASM. SUB 
PHELP.COM 
PHELP.MAC 
HELP.DOC 


SD-2/6.ASM 
SD.COM 
ENTAB.ASM 
ENTAB .COM 
UTIL.FOR 
LOOPBAK1.BAS 


FORTH11.ASM 
FORTH11.COM 
FORTH11.DOC 


a) 
b) 
c) 
d) 


siz 
28K 


7K 
3K 


MITS to CP/M file conversion system 
HELP file system 

related system support programs 
FIG-FORTH 1.1 system 


e description 


MITS to CP/M file conversion 
/ 


HELP file system 


updated SUPER DIRECTORY display 
/ 

space suppression program 

/ 


FORTRAN array handling subroutine 
PMMI loop back test 


FIG-FORTH version 1.1 
/ 
/ 


POLY-vU 
#PV119 


K&M Company 
TORRANCE, CA 90503 


er) 


~CATALOGO14 1K 
ALGOLM HLP 13K 
ASM HLP 4K 
ASM2 HLP 4k 
Cc HLP 17K 
CBASIC HLP 14K 
CBASIC2 HLP 22K 
CPM HLP 31K 
CPM2 HLP 37K 
EBASIC HLP 12K 
FORTRAN HLP 7K 
HELP COM 2K 
HELP HLP 7K 
MAC HLP 8K 
MASM HLP 8K 
MBASIC HLP 21K 
PASCAL HLP 10K 
SIG/M LIB 2K 
18 file(s). 


40 directory entries remaining. 


A>STAT O: 


SIGMUG vol. 14 


Bytes Remaining On O: 21k 


A>TYPE -CATALOG.014 


SIG/M volume 14 


number 


14.1 
14.2 
14.3 
14.4 
14.5 
14.6 
14.7 
14.8 
14.9 
14.10 
14.11 
14.12 
14.13 
14.14 
14.15 
14.16 


A> 


name 


HELP.COM 
HELP.HLP 
CPM.HLP 
CPM2.HLP 
ASM.HLP 
ASM2.HLP 
MAC .HLP 
MBASIC.HLP 
CBASIC.HLP 
EBASIC.HLP 
CBASIC2.HLP 
MASM.HLP 
ALGOLM.HLP 
C.HLP 
FORTRAN. HLP 
PASCAL. HLP 


HELP file system on major system level software 


description 


8/13/85 


HELP file system describing 


HELP 
CP/M 
CP/M 
CP/M 
CP/M 
CP/M 


BDS 


file system 
1.4 
2.2 


1.4 ASM (assembler) 
2.2 ASM (assembler) 
MAC (macro assembler) 
Microsoft BASIC 
CBasic 

Basic-E 
CBasic-2 
MACRO-80 (M80) 
ALGOL-M 


tcl 
Microsoft Fortran 


PASCAL/MT 


HELP HELP 
HELP V1.1 


HELP File Selections are -- 
A. Welcome to the HELP Command 
B. How to use the HELP Command 
C. How to write .HLP Files 
D. Help on CP/M in general 


Type CTRL-C to return to CP/M, "*" to select all, or enter selection - * 


HELP: Welcome to the HELP Command : z 

Welcome to the HELP Command! The HELP Command is designed to assist 
you, the CP/M user, in the use of CP/M in general and specific CP/M 
commands in particular. It is designed as an interactive, on-line 
assistance system. 

HELP pulls in files named <FILENAME>.HLP from disk and displays these 
to the user in a paged mode. These files are of two basic types -- indexed 
and non-indexed. : 


Indexed files are those .HLP files which start with an index. This is 


an example of an indexed file. When HELP Joads an indexed file, it 
displays this index to the user and allows him to select entries from it. 
The user may select as many entries as he desires in any order he desires 
by simply typing the letter of his selection. Once the user has made his 
selection, help will look up the body of text he selected and display it to 
him in a paged mode. When the user has finished reading his selection, 
HELP then returns him to the index menu. Typing a Control-C will return 
the user to CP/M. 

Non-indexed files are those .HLP files which do not start with an 
index. In such cases, HELP will immediately display the contents of the 
file to the user and, when the user has finished looking at it, HELP wiil 
return to CP/M. ; 

HELP is menu-driven, and all the commands available to the user at any 
given time are displayed to him. 


HELP can be a very useful tool for on-line reference to the user. It, | 
in conjunction with the many HLP files now available, has already proven to © 
be of significant value. 

Richard Conn 


++ EOI ++ Type CTRL-C to return to CP/M, <CR> to continue ~- 
HELP: How to use the HELP Command 
The HELP Command is executed in one of three ways: 

(1) by just typing 'HELP' 

(2) by typing 'HELP FILENAME', where FILENAME 
is the name of a disk file named FILENAME.HLP 

(3) by typing 'HELP FILENAME,EXT', where 
FILENAME.EXT is the name of a file created in 
the format of a help file 


If the user types just 'HELP', he will receive the HELP.HLP help file 
(now being displayed to you). For all other forms of the HELP command, the 
user will see the specified help file information. Generally speaking, the 
name of the help file should be indicative of its subject, like CPM.HLP 
Should contain help information on CP/M, 


++ EOI ++ Type CTRL-C to return to CP/M, <CR> to continue - 
HELP: How to write .HLP files 

Files used by the HELP program are either simple CP/M-standard files 
of ASCII text or ASCII files generated by the Word Star text 
editor/formatter. These files, as mentioned above, are of two basic types: 
indexed and non-indexed, and each type is related to the other and is of 
the same basic format. 


Grouping of Information 


Information displayed to the user is grouped by the index in indexed 
HLP files and may also be grouped by lines beginning with Form Feed (“L) 
characters. Grouping is an effective way to logically organize information 
so that meaning will be more clear to the user and units of information 
will not pass between screen displays. 


Non-Indexed .HLP Files 


Non-indexed .HLP files are simple ASCII files which start with a colon 
(:) as the first character of the file and consist of ASCII text (with each 
line terminated by a carriage return/line feed character combination). The 
information in such a help file consists of all text after the leading 
colon up to either the terminating end-of-file mark (control-Z2) or a new 
line which starts with a colon. 


Indexed .HLP Files 
2 

Indexed .HLP files are simple ASCII files which do not start with a 
colon (:) as the first character of the file. This type of .HLP file 
consists of one or more normal ASCII text lines as the first lines of the 
file followed by information sections which begin with a line whose first 
character is a colon and end with either the first line of the next 
information section or the end of the file. 


++ EOI ++ Type CTRL-C to return to CP/M, <CR> to continue —- 
HELP: General Information on CP/M 

CP/M is a monitor control program for microcomputer system development 
which uses IBM-compatible flexible disks (floppy disks) for mass _ storage. 
Using a microcomputer mainframe based on Intel's 8080 or Zilog's 280 
microprocessor, CP/M provides a general environment for program 
construction, storage, and editing, along with assembly and program debug 
facilities. An important feature of CP/M is that it can be easily altered 
to execute with any computer configuration which uses an Intel 8080 or 
Zilog 280 Microprocessor and has at least 16K bytes of main memory with up 
to four IBM-compatable diskette drives. 

The CP/M monitor provides access to programs through a comprehensive 
file management system. The file subsystem supports a named file 
Structure, allowing dynamic allocation of file space as well as sequential 
and random file access. Using this file system, a up to 64 distinct 
Programs can be stored in both source and machine-executable form. 

Digital Research, the designer of CP/M, has provided a set of six 
Manuals which describe the use and operation of CP/M in detail. 


Type "A™"=Abort, CTRL-C=CP/M, <CR>=Cont - 


These manuals are: 

1. An Introduction to CP/M Features and Facilities 
- ED: A Context Editor for the CP/M Disk System 
.- ASM: CP/M Assembler User's Manual 
- DDT: CP/M Dynamic Debugging Tool User's Manual 
- CP/M Interface Guide 
- CP/M System Alteration Guide 


D OI & Wb 


As the reader can see, CP/M supports a context editor, an assembler 
(Intel-compatable), and a debugger system. These are available in the 
basic CP/M package. There is a large variety of other software available 
which can run under CP/M with little or no modification. Such software 
includes several assemblers (both 8080 and 280), a symbolic debugger, 
several high-level languages (including FORTRAN IV {compiler}, BASIC-E 
{translator}, CBASIC {translator}, many interpretive BASICs, ALGOL, FOCAL, 
and C), and several special-purpose applications programs (such as text 
formatting systems and accounting systems). . ; 


Refer to the indicated manuals and/or the CP/M help file for further 
information. 


++ EOI ++ Type CTRL-C to return to CP/M, <CR> to continue - 
O> 


POLY-vu 
#PV119 


. CA 29503 


K&M Company 


TORRANCG 


! 


Oo 


-CATALOGO15 


CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 


More.. 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
SIG/M 


More.. 

SIGMLOG 
SIGMLOG 
SIGMLOG 


001 


001 
002 
003 


47 file(s). 


16 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 14k 


Cc> 


SIGMUG vol. 


iS 


10/8/85 


TYPE -CATALOG.01S 


SIG/M volume 15 documentation catalog of CP/M UG volumes 1-42 
and SIG/M volumes 1-3 as published by the NYACC 


This volume contains the various *.DOC, ABSTRACT.*, READ.ME, etc 
files as contained in the CP/M UG and SIG/M volumes. This was 
compiled and published by the NYACC to facilitate ready reference 
of public domain software for the micro-hobbiests. SIG/M volume 
12 is the corresponding cross reference to this release. 


CATALOG.nnn refers to a CP/M UG release volume nnn 
SIGMLOG.nnn refers to a SIG/M release volume nnn 


O> 


POLY-vu 
#PV119 


 — SLGMUG vol. 17 oT 078/85 


~CATALOG017 2K 
21BIOS ASM 48K 
21BIOS DOC 3K 
21BOOT ASM 4k 
MACRO LIB 18K 
MNEXEC COM 3K 
MNOVRLAYASM 4K 
MOVPATCHASM 3K 
NEWOCAT ASM 5K 
NPGEN ASM 9K 
SCRAMBLEASM 6K 
SCRAMBLEDOC 2K 
SORTV DOC 2K 
SORTV-12ASM 13K 
SPCLMAC LIB 4K 
STATUS ASM 8K 
TAG2 ASM 6K 
TFX12/18ASM 21K 
WHICH/1 ASM 4K 
WORM8/8 ASM 7K 
XDIR COM 2K 
XMODEM 41HEX 5K 


22 file(s). 
38 directory entries remaining. 
C>STAT O: 


Bytes Remaining On O: 62k 


CTYPE O:-CATALOG.017 


Sig/M volume 17 miscellaneous CP/M utilies 


K&M Company 
=. CA 99503 


TORRANC 


> 


| 


Name Size Description 
-CATALOG.017 contents of Sig/M volume 17 
-CATALOG.ACK acknowledgement file 
17.1 SCRAMBLE.DOC 2K command used to encode a CP/M file 
17.2 SCRAMBLE.ASM 6K / 
17.3 SORTV.DOC 2K sort program for variable length records 
17.4 SORTV-12.ASM 13K / ; 
1735 TAG2.ASM 6K set/reset display the "no copy" flag 
17.6 MNEXEC.COM 3K MicroNet executive 
17.7 MNOVRLAY.ASM 4K overlay for MicroNet executive 
17.8 WHICH/1.ASM 4K returns size and version of CP/M 
17.9 STATUS .ASM 8K present various systems information under 2.2 
17.10 NEWQCAT.ASM 5K quick catalog routine 
17.11 WORM8/8.ASM 7K memory test 
17.12 TFX12/18.ASM 21K CP/M to CP/M file transfer utility 
17.13 XMODEM41.ASM 29K remote CP/M to CP/M file transfer 
17.14 MOVPATCH.ASM 3K modifies MOVCPM for remote access 
17.15 21BIOS.ASM 48K new BIOS for CP/M 2.0 
17.16 21BIOS.DOC 3K / 
17.17 21BOOT.ASM 4k / 
17.18 MACRO.LIB 18K Z 
17.19 #NPGEN.ASM 9K / 
17.20 SPCLMAC.LIB 4k / : 
17.21 XDIR.ASM 13K updated CP/M directory display 
17.22  XDIR.COM 2K / 
C> 


TyPE 21B10S .D0L 
May 24, 1980 


To Whom it may concern: 


This disk contains a recently developed BIOS and support routines 

for CP/M (Copyright Digital Research). The BIOS was developed from rou-— 

ines retrieved from the CPMUG, Tarbell! Electronics, DR's CP/M 2.0 and 
J. S. Singer. It is meant to operate as a full blown BIOS under CP/M 2.0. 
In particular, it was developed to give the full disk capabilities that 
CP/M 2.0 and DFOCO, a disk utility by S. J. Singer, provide. It supports 
single and double density disks with 128, 256, 512 or 1024 sector sizes. 
The non-disk drivers fully support the virtual re-assignments allowed via 
the IOBYTE. Also, special utilities are provided to give the user quick 
access to the new functions being supported. 


The BIOS may be as large as 2.75k. Currently, it is limited to 
.75k by the way its stored on the diskette. To provide more room, I put 
the CCP on the disk as a regular disk file. For warm or cold starts, I 
merely open it as a regular file and read it in. Unfortunately, this 
takes more time than I really tike due to required system overhead (I.E. 
System Reset, Disk Select, etc.). In the future, I plan to change it so 
that 8 tracks are used for system tracks instead of two. 


To generate the system, follow the instructions given in the BIOS. 
You will use files, 21BIO0S.ASM and 21BO0OT.ASM. The system generation is 
almost the same as if you were doing it for any old CP/M. To regenerate 
the system under itself, you MUST use the NPGEN.ASM file instead of SYSGEN 
and 21BOOT.ASM. These instructions can be found in the front of NPGEN.ASM. 
Please insure that you are familiar with system generations before tackling 
this one. Also, always keep a backup of your old system. This thing can 
become tricky! 


oe I look forward to any constructive comments and suggestions. 
Respectfully, 


Robert M. White 

H & W Computer Systems, Inc. 
8530 Stonehaven 

Boise, ID 83704 

(208) 377-0336 


W-A-R-N-I-N-G 


1. It may seem that some the files on this tape are repeats of old ones. 
Be advised that ALL files have been updated. That is, they are dif- 
ferent from the old ones. Please don't try to interchange them. 


2. System generations may be hazardous to the health of your current sys— 
tem if you don't back it up. Always do so! Also, generate the new 
system 16k smaller than your current one. Then to check out problems 
with DDT, you can re-boot your current system and look at the new BIOS's 
areas. 


3. All programs on this disk require MAC, the macro assembler distributed 
by Digital Research. 


O> 


TYPE SCRAMBLE ,UOU 
SCRAMBLE is a command used to encode a CP/M file. 


The format of the command is: 
SCRAMBLE filename.type password 
where "password" is an 8 character password made of characters 
erissible in a file name (i.e. no ".", etc). To obtain a good 
Gx initial seed" for the scrambling process, no character in the 
password may appear more than twice. 


The requested file is scrambled, and re-written in place. 

To un-scramble the file, the IDENTICAL command is issued, 

i.e. SCRAMBLE filename.type password. This is because 
SCRAMBLE does an "exclusive-or" type modification to the file, 
and doing two identical exclusive-or's to data result 

in the same data being retuned. 


I feel a scrambled file is quite secure. Given that a file 
was scrambled and the password forgotten, I know of no way to 
determine what the original file was. Even a file which 

is all binary-O's, is sufficiently scrambled to defy finding 
out what the password or original data was. ...But I assume 
no responsibility for the "security" of files scrambled 

with SCRAMBLE as I am not a "student of cryptology". 


Note also, that if an attempt is made to unscramble a scrambled 
file, using the WRONG password, then the file is technically 
"double scrambled" and SCRAMBLE would then have to be executed 
TWICE, once with the original password, and once with the 
erroniously-used password. Because of the exclusive or-ing 
process, either password may be used either time. 


Qo Ward Christensen 


O> 


SORTV.DOC (vevised 1/14/81) 
Brief commentary on the use of SORTV 
by Ward Christensen 


SORTV is a "Simple" sort program for variable length (CR/LF 
terminated) record files, i.e. the typical CP/M file of 

@ ists of things. It defaults to sorting from the 1st char 
in the line, but can skip past any particular characters 
that occur in the file. The file being sorted must fit 
in memory. You may write back to the input file, or to 
another. /// A typical use would be to sort a list of 
filenames into filetype sequence, i.e. names.sub from FMAP. 
Some examples: If you want to sort "files.nam" into se- 
quence: SORTV FILES.NAM; To sort a list of names las pro- 
duced by FMAP *.* Q, for example) by filetype: 
SORTV NAMES.SUB @. The "@" means to sort "at", and the "," 
means at the period. Note EACH line must have the skip-— 
character specified. To sort a file skipping a period, 
a comma, and 2 spaces: "SORTV NAME @., " where you put 2 
spaces after the ",". 


Here's the general way to execute SORTV - 
To write back to file in place: SORTV name 
To write to another: SORTV inputname outputname 


If you should want to use a tab as a skip character, you 

must either specify an output filename, or use a single 

"." for the output name (causes input to be overlaid with 
oo" This is because CP/M doesn't like having a con- 

rol character in a place it considers to be a filename 

(one of its two it may take on a command). Thus to skip 

a tab, a period, and another tab, writing "FILE" back to 

itself: SORTV FILE . @*I.°I where "*I" means you pressed 

the "tab" key. If you typed: SORTV FILE @*I.*I CP/M would 

reject the command because it thinks you are putting a 

tab into the second (output) filename. P.S. bug: file must 

end with cr/If. Enjoy. 

Ward Christensen 01/14/81 


0> 
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~CATALOGO18 
2411DUMPASM 
2411DUMPCOM 
381 2DUMPASM 
3812DUMPCOM 
AREACODEASM 
AREACODECOM 
ASMTIME ASM 
BANZAI ASM 
CAT2 ASM 


CAT2 COM 
CHATI5 ASM 
-CHAT15 COM 


DDMACRO LIB 
DISPLAY COM 
DISPLAY DOC 
DISPLAYPASM 
FILE-EXTASM 
FILE-EXTCOM 
FILE-XT2ASM 
FILE-XT2COM 
FMAP3 ASM 


More.. 

LOAD COM 
LOOK ASM 
LOOK COM 
MACTIME ASM 
MFMACRO LIB 


SAP ASM 
SAP COM 
STATTIMEASM 
UCAT2 ASM 
XLOOK ASM 
32 file(s). 


6K 
8K 
13K 


SIGMUG vol. 18 


28 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 24k 


C> 


10/8/85 


TYPE O:-CATALOG.018 


Sig/M 


18.1 
18.2 
18.3 
18.4 
18.5 
18.6 
18.7 
18.8 
18.9 
18.10 
18.11 
18.12 
18.13 
18.14 
18.15 
18.16 
18.17 
18.18 
18.19 
18.20 
18.21 
18.22 
18.23 


18.24 


18.25 
18.26 
18.27 
18.28 
18.29 


c> 


volume 18 


~CATALOG.018 
~CATALOG.ACK 


Name 


2411 DUMP.ASM 
2411DUMP.COM 
MFMACRO.LIB 
3812DUMP.ASM 
3812DUMP.COM 
DDMACRO.LIB 
AREACODE.ASM 
AREACODE.COM 
BANZAI.ASM 
CAT2.ASM 
FMAP3.ASM 
UCAT2.ASM 
CHAT15.ASM 
CHAT15.COM 
DISPLAYP.ASM 
DISPLAY .COM 
DISPLAY .DOC 
FILE-EXT.ASM 
FILE-EXT.COM 
FILE-XT2.ASM 
FILE-XT2.COM 
LOOK.ASM 
LOOK .COM 
MACTIME.ASM 
ASMTIME.ASM 
STATTIME.ASM 
SAP.ASM 

SAP .COM 
XLOOK.ASM 


miscellaneous 


Size 
18K 


17K 
21K 


18K 
14k 


13K 


CP/M utilstses 


catalog of Sig/M volume 18 
volume 18 acknowledgement file 


Description 


ICOM microfloppy utility 
/ 

‘a . . 

ICOM floppy utility 

/ 


/ 
region and state area code search 
/ N 
copyright notice protect 
master catalog system for CP/M 2.x 
/ 
/ 
chat with local remote CP/M operator 
/ 
display facilities of ED.COM 
/ 


/ 
display disk directory including hex data 
/ 


same aS FILE-EXT.ASM with 2.X compatibility 
/ 

searches for 1-9 byte sequence in memory 

/ 

patch for real time clock in MAC.COM 

patch for real time clock in ASM.COM 

patch for real time clock in STAT.COM 
cin directory sort for CP/M 2.x 


disk/examine/modify utility 


TYPE DISPLAY .DOLU 
Display, Ver.1.0 


as of 


October 30, 1980 


© cic allows displaying an ASCII file on a 24 tine 
terminal, with commands similar to Digital Research's ED.COM 
(but without any of the editing facilities). 


Using DISPLAY.COM 


For example: DISPLAY FILENAME.TXT<cr> »will envoke the 
display program and load the entire secondary entry 
(FILENAME.TXT) into memory, for subsequent display of the first 
23 lines of that file. Various commands can then be issued from 
the terminal keyboard which will manipulate the display of the 
file. 


The commands shown below with a preceding "n" indicates that 
an optional unsigned integer value can be specified to envoke 
"n" iterations of the command. When a command is preceded by a 


"_" sign, the command will cause display of the file in a 
direction towards the start of the file. Unsigned integer 
values are assumed to be positive values lCi.e., "“+") and 


therefore "+" need not be specified. Also, the buffer pointer 
will stop display at the top or bottom of the file if too large 
a value of "n" is specified. 


Os canane: Operation performed: 


B Move pointer to beginning of file and display page. 
-—nP Move pointer minus n pages and display page. 
.mP Move pointer plus n pages and display page. 

OP Move pointer to beginning of buffer and display page. 
—nl Move pointer minus n lines and display page. 

no Move pointer plus n lines and display page. 

nD Discard n pages, refill buffer and display the 


current page. 


oD Discard all data up to the current pointer, refill 
buffer and display the first page. 


E Exit DISPLAY and return to CP/M, 

“6 Controlt-C, exit DISPLAY and return to CP/M. 
Oc Carriage return, move pointer to next page and 
= display 


Kelly Smith, MP/M-Net (tm) Sysop 
fee PRES ee 805-527-9321 (Modem, 300 Baud) — 


K&M Cor:pany 


TORRANC 


> 


*) 


CA 97503 


-SMCAT 026 
/CATA026ACK 
CHEAT ADV 
CHEAT DOC 
CRCK COM 
CRCKLIST026 
DDSKBIOSASM 
EBASIC COM 
EL-E BAS 


EL-E DOC 
EL-E INT 
FORMAT 280 
MYBOOT 280 
MYDDBIOSDOC 
MYDDBIOSZ 80 
QSO BAS 
QSO DOC 


QSOEDIT BAS 
QSOFIND BAS 
QSOLIST BAS 
QSOMERGEBAS 
QSOSCAN BAS 


More.. 

RUN COM 
SCRAMBLECOM 
SCRAMBLEDOC 
SIG/M LIB 
SVC LIB 


SYSGEN 280 
SYSMON ASM 
SYSMON COM 
SYSMON DOC 
VEGAS ASM 
XEDIT BAS 
XEDIT INT 
XEXTRACTBAS 
XEXTRACTINT 
XFIND BAS 
XFIND INT 
XLABELS BAS 
XLABELS INT 
XLIST BAS 
XLIST INT 
XMAIL DOC 
XMASTER FIL 


More.. 

XMERGE BAS 
XMERGE INT 
XSCAN BAS 
XSCAN INT 
XTEL BAS 
XTEL INT 
50 file(s). 


SIGMUG vol. 26 10/8/85 


TYPE O:/CATA026.ACK 
Front Panel simulation - Terry Kennedy 
SD Sales double density BIOS - John Monahan 
Ham Notebook - Joe Schrabal 
Electrical Engineering package ~ Joe Schrabal 
Adventure cheat sheet - from your friendly pirate 
Las Vegas Super Slot - David W. Friedman 
Simple Mail Label System - Hank Kee 


10 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 14k 


Cc> 


ae 


GB yvIerorivrAaste VL 


Sig/M.026 
-CATALOG.026 
-CATA026 .ACK 
CRCKLIST.026 

index name 

26.01 CHEAT.ADV 

26.02 CHEAT.DOC 

26.03 VEGAS.ASM 

26.04 EL-~E.BAS 

26.05 EL-E.INT 

26.06 EL-E.DOC 

26.07 QSO.BAS 

26.08 QSOEDIT.BAS 

26.09 QSOMERGE.BAS 

26.10 QSOFIND.BAS 

26.11 QSOSCAN.BAS 

26.12 QSOLIST.BAS 

26.13 QSO.DOC 

26.14 SYSMON.ASM 

26.15 SYSMON.COM 

26.16 SYSMON .DOC 

26.17 SVC.LIB 

26.18 MYDDBIOS.2Z 80 

26.19 MYDDBIOS.DOC 

26.20 DDSKBIOS.ASM 

26.21 MYBOOT.Z 80 

26.22 FORMAT .Z80 

26.23 SYSGEN.2Z80 

26.24 XEDIT.BAS 

26.25 XEDIT.INT 

26.26 XMERGE.BAS 

26.27 XMERGE.INT 

26.28 XSCAN.BAS 

26.29 XSCAN.INT 

26.30 XEXTRACT.BAS 

26.31 XEXTRACT.INT 

26.32 XLIST.BAS 

26.33 XLIST.INT 

26.34 XLABELS.BAS 

26.35 XLABELS.INT 

26.36 XFIND.BAS 

26.37 XFIND.INT 

26.38 XTEL.BAS 

26.39 XTEL.INT 

26.40 XMAIL.DOC 


BASIC~-E(EBASIC.COM 
included in the distribution to facilitate access, 


C> 


games 
a simple mail label system 
electrical engineering package 

ham notebook 

front panel emulator 

VersaFloppy II double density BIOS 


contents of Sig/M.026 
acknowledgement file 
checksum file 


size notes 

3K unofficial ADVENTURE cheat sheet 
1K f 

26K super slot machine 

18K electrical engineering/design system 
16K / 

2K / 

1K ham notebook - CBASIC 

4K / 

2K / 

1K / 

4k / 

1K / 

2K / 

36K front panel emulator 

5K / 

6K / 

1K / 

13K VersaFloppy II double density BIOS 
4K / 

2K / 

2K / 
10K 7 

4k / 

3K simple mail label system - data entry 
2K / 

2K file merge 

1K / 

2K delete items from master 

1K 

2K extract items from master 

1K 

1K list items from master 

1K / 

2K mail label print 

1K / 

1K /query of master 

1K 

= Py guery by telephone number 

3K simple mail label] system - documentation 
RUN.COM), SCRAMBLE and CRCK have been 


TYPE CHEAT. DUC 
CHEAT.ADV is the unofficial cheat sheet to Adventure (Sig/M 
volume 1). The file is passworded and needs to be unSCRAMBLEd. 


SCRAMBLE is a command used to encode/decode a CP/M file. 
The format of the command is: 
SCRAMBLE filename.type password 


where "password" is an 8 character password made of characters 
permissible ina file name (i.e. no ".", etc). The requested 
file is scrambled, and re-written in place. 


Note that if an attempt is made to unscramble a scrambled file, 
using the WRONG password, then the file is technically "double 
scrambled" and SCRAMBLE would then have to be executed ‘TWICE, 
once with the original password, and once with the erroneously- 
used password. 


The password is a magic word in Adventure. It appears in the text 
of the original version. 


from your friendly Pirate 


O>TYPE SCRAMBLE. DOC 
SCRAMBLE is a command used to encode a CP/M file. 


The format of the command is: 

SCRAMBLE filename.type password 
where "password" is an 8 character password made of characters 
perissible in a file name (i.e. no ".", etc). To obtain a good 
"initial seed" for the scrambling process, no character in the 
password may appear more than twice. 


The requested file is scrambled, and re-written in place. 

To un-scramble the file, the IDENTICAL command is issued, 

i.e. SCRAMBLE filename.type password. This is because 
SCRAMBLE does an "exclusive-or" type modification to the file, 
and doing two identical exclusive-or's to data result 

in the same data being retuned. 


I feel a scrambled file is quite secure. Given that a file 
was scrambled and the password forgotten, I know of no way to 
determine what the original file was. Even a file which 

is all binary-0's, is sufficiently scrambled to defy finding 
out what the password or original data was. ...But I assume 
no responsibility for the "security" of files scrambled 

with SCRAMBLE as I am not a "student of cryptology". 


Note also, that if an attempt is made to unscramble a scrambled 
file, using the WRONG password, then the file is technically 
"double scrambled" and SCRAMBLE would then have to be executed 
TWICE, once with the original password, and once with the 
erroniously-used password. Because of the exclusive or-ing 
process, either password may be used either time. 


03/11/79 Ward Christensen 


O> 


aad a aM ae LO, 


EL~E.DOC 
*** ELECTRICAL ENGINEERING & DESIGN *** 


All programs written by J. Schrabal and are COPYRIGHTED 1981 
BY J. SCHRABAL WITH ALL RIGHTS RESERVED but released free for 
non-commercial use. 


If you don't have sufficient memory you can Separate each 
section, and use it independently as individual programs. 


It is easy to simplify entry for the last program (crystal 
frequency calculations) by entering and storing data for the gear 
you and your friends use (IF frequency, multiplication, split). 


73 WA2USS 


electrical engineering and design package by J. Schrabal 


EL-E.BAS Electrical engineering and design 
ELOHM. BAS ohm law 
ELZENER. BAS design zener stabilized circ. 
ELPOWER. BAS components for DC power supl. 
ELLOW. BAS low-pass 2-pole Batt. filter 
ELRESON. BAS series resonant freq.circuits 
ELFILTER. BAS passive passband filter 
ELCOIL. BAS inductance & small coil design 
ELANT. BAS long wire antenna 
ELDIPOLE. BAS dipole or half wave antenna 
ELTIME.BAS time constant calculations 
ELWIRE. BAS resistance of wire -—"- 
ELCRYST. BAS crystal frequency -"- 
EL-E.DOC Documentation on EL-E.BAS 


O>TYPE QSO.DOC 
QSO LOG PROGRAM 
By J. Schrabal, Nov.79 


I found the basic "Labels" program of H. Kee to be so simply 
written that it is easier to rewrite them to any particular need 
rather than bother with complex data baSe programs, postmaster 
and others available. I used Hank's idea for address and 
telephone book for my wife, notes on members of our S100/CPM 
users group, yachtclub saling events and many others. 


Then I wanted to modify it for simple memo on my contacts by 
amateur radio over 2 meter Metroplex repeater for local contacts 
and separate file for 2 m link to 10 meter repeater over which I 
contacted many of the US continental states stations and 29 DX 
foreign stations. 


Simply, I wanted to sort domestic and foreign calls just as 
printed and sorted in the Callbook. 


My program tests the 2nd letter and if it is number then it 
inserts a spacebar. Being confused with the new FCC's call 
assignement, while sorting, the program treats all the first 
letters of US calls as 'W' and then by number and call. Result 
is sorted file by country, region and call. 


How it works / 


6, 
You must first create a file. It could be just single entry 8 . 
but must end with END line just as in enclosed sample file. ge’ *& 


qien entry iS maae, it 1S .eing reprintea ,witi Space par 
after single letter country sign). If correct operater enters "Y" 
or entry is ignored otherwise. 

When "END" is entered, all entry is then sorted by country 
(US calls all together regardless of sign), then by region, and 
then by sign, and stored in temporary workfile.. 

Then the workfile is merged with the file you specify. The 
new file must have different name. I usually note the date of 
last entry (for example QSODX.205 for Feb.2) while the old file 
is preserved as an entry. 


Nice feature is that you can have several files, for example 
for repeater contacts, 10 meter - link contacts, DX contacts,etc. 


Modifications 


Program can be easily reworked so that each entry has field 
you like for your operation. Not all fields have to be displayed 
for quick reference, and it it easy to create a program for 
specific purpose, for example listing of stations due for QSL- 
card. 


While written in C-basic the program will run on _ E-basic 
after simple modification. Just REName all the programs listed in 
QSO.BAS under 'SINCLUDE' from *.BAS to *.LIB, then use EDitor and 
Read the programs in. Then Kill the extra features of C-basic 
such aS LPRINTER, CONSOLE, etc. and obviously then the program 
will no longer have these features (OQSOLIST you have to use 
ctrl-P for printing, and it will print on the printer and also on 
your console). 


If you don'have sufficient memory then each program can be 
compiled and used individually (Kill the jump to MENU at end of 
each program). 


73 WA2USS 


QSO.BAS Sorted ham notebook - CBAS 
QSOEDIT.BAS entry 
QSOMERGE. BAS merge with file 


QSOFIND. BAS find any string 
QSOSCAN. BAS scan,mod.fields 
QSOLIST.BAS print file 
QSO.DOC DOCumentation, modif.of QSO.BAS 


O> 


TYPE S/S 10N.00U 


This text file was originally comment lines in the SYSMON 
Source file. Any references to 'this code' refer to the file 
SYSMON .ASM, 


This code was originally written as one of my first program— 
ming efforts in early 1978, and I have cleaned it up slightly 
since then. It runs well, and there are no known bugs, but it 
isn't as 'fancy' as it might be. oh well. 


Since it has been pointed out to me that "the programming 
style looks ltike so-and-so's", let me give credit where credit is 
due: 


A To the CP/M User's Group (as it was in 1978, not as 
it is now) for distributing assembler source files of Some 
very nice (for the period) utilities. 


B To L. E. Hughes, 8080 SDC (does it still exist?) for 
submitting the aforementioned utilities, and whose RM8O 
provided the inspiration for me to tackle this programming 
project back in the Dark Ages of microcomputing. 


NOTICE -- 1 NOTICE -- NOTICE 


If you are going to use this code, you MUST modify some 
hardware constants. To avoid getting burned, PLEASE assemble the 
whole thing as it is and READ the WHOLE listing to get a better 
understanding of what the program is all about. It can be pretty 
confusing at first. 


P.S. - If you edit and re-assemble with D.R.'s ASM, make 
sure that it assembles OK. ASM gets confused by multiple nested 
IF's, of which there are many. 


NOTE: CP/M is a (registered) trademark of Digital Research, 
Inc., Pacific Grove, California. Reference to this trademark 
within the body of this text is only to indicate that this code 


will interface with said trademarked product, and does not imply 
that the owner of the trademark owns, approves, or uses this 
code. 


Usage: This code text is the source for a powerful monitor 
designed to emulate front-panel type data manipulation functions. 
The code was designed to be placed into EPROM in all systems, 
whether or not they had front panels. Therefore, if the user has 
a front panel, the code will attempt to boot the operating system 
of of the first physical drive ({A:). If the user doesn't have a 
front panel, control passes to the command interpreter, giving 
him some front panel type commands. The user may simulate a front 
panel-less system by setting the front panel switches to 80 hex. 


Comment(s): This is 8080 source code and could be made much 
more compact if Z80(tm) code was used (especially I & O com- 
mands). This code as supplied doesn't 'do anything' by itself — 
you will have to alter it to suit your system. The disk control— 
ler this code runs is the Digital Microsystems FDC-3. If you have 
a different controller, DON'T try modifying these drivers — write 
NEW ones. The code to drive a FDC-3 is very comptex, and since I 
am probably the only person within 500 mites (besides Bob 
Radcliffe) who has one, I'm NOT going to explain how my drivers 
work. The references to ‘boot disnnostic s stem! refer to a disk— 


Basedqd diagnostic package which uses this code for [tow-level 1,0 
support. That package is NOT available and will not be available, 
as it is well over 2 man-years in the making. Therefore, you may 
delete the 'S' command from the the code if you desire. The 'L! 
command works as follows: From an input device lany byte-serial 
device will do, I use a cassette) a filename is read. The file- 
name may be as long as 16 characters. When a file with the same 
name is read from the tape, it is loaded in. The file is presumed 
to be in Intel Hex format. The format of the filename and data on 


the tape is as follows: 


--- data --- [any random data) 
;filename {the filename is preceded with a ';') 
IXXXXXXXXXXXX CIntel hex formatted object code) 


. (more Inte! hex data) 
<4A> (the file is terminated with a Control-Z) 


The supervisor calls work as follows: The user CALLs 
location SUPER: with a supervisor cal! code stored at SVC:. The 
desired function is performed and control is returned to the user 
program. If an out-of-bounds SVC is issued, a trap message will 
be generated and the monitor will be entered. See 'SVC.LIB' on 
the disk for a calling macro. The ltabel!l CS: near the end of this 
file is the clear screen code used by the program. Alter it’ to 
suit your terminal. 


Command summary — for details refer to help text code at 
the end of the source file. 


- Boot operating system 

- Dump memory 

- Enter hex data 

- Fill memory 

- Go to address 

- Halt the computer 

- Input from port 

Load software from peripheral 

- Move data 

- Output to port 

- Exit to operating system (only if testing equ true) 
- Display 8080 register set 

- Boot diagnostic disk 

- Test supervisor call (only if testing equ true) 
addr/ — Modify memory data at addr 


4HMNDOPOFrHTAA IMD 
! 


Enjoy it. 


yee 


TYPE MYODBIOS.UDUL 
If you are lucky enough to have a VERSAFLOPPY II disk controller board you 
will appreciate how reliable it is. There was one problem however SD Systems 
supplied a bios for their SDOS. I wanted to run CP/M 2.2 and simmilar systems 
The 5 programs: 
MYDDBIOS.z80 
MYBOOT .Z80 
+) DDSKBIOS .z80 
= SYSGEN .Z80 
FORMAT .Z80 
should allow you to get CP/M running on this board. 


Here is how it works. First only two drives are assumed (A: & B:) both must 
be 8" drives. This saves a lot of extra code I did not want but others could 
probably modify acordingly. The major problem is the bios must know if it 
is talking to a single density disk or double density disk (sd dd). RAM 
locations 58h & 59h will always contain flags for the density of drives A & B 
Upon cold or warm boot the bios gets the density of disk A (see below). If it 
is sd then 58h=00h if dd then 58h=40h. Since drive B: has not yet been called 
in a flag of Offh is put at 59h. The first time B: drive is selected 
its density is selected and the Offh flag is changed to either OOh or 40h. 
When CP/M does a SELDSK it will be routed to one of two different disk 
parameter lookup tables depending on the two above flags. 


How does the board find out the density of the disk? SD systems used a neet 
trick. They use a trial and error method. Upon any read address command 
the 4th byte returned is the sector length. For 128 byte sectors it is 

00h. So if the read address command returns anything othere than OOh chances 
are we do not have the correct disk density. Look at my UNITSL: routine and 
this will hopefully be clear. 


I have made one large extra addition to the bios at the end you may want to 

remove. It is a section to display on a VDM board in “real time" the actual 

sector,track,disk currently being read or written to. Bit 7 of port Offh turns 
oo" info on or off. It is great for debugging at the start. 


All of the above and 99% of the bios is stored in ROM (just like SD SYSTEMS 
do for their system) -- this is by the way MYDDBIOS.z80 


Two othere things are required:- 

MYBOOT .Z80 is the CP/M boot loader to go with this system. As usuall it 
goes on track O sector 1 of all disks. This loader brings in the rest of CP/M 
loads it at the correct place in RAM (this depends on the size of your CP/M 
system) along with a tiny RAM based BIOS which I call:- 


DDSKBIOS.Z80 As far as CP/M is conserned this is THE bios. It contains 
all the appropiate jumps to the ROM bios and the RAM dependent disk parameter 
lookup tables. 


If you are new at this stuff get somebody to show you how to link in these 
two programs to CP/M before sysgening a system. 


The following is an example of a 60k system setup 
ZSID 

F100, 4000,0 

ICPM60 .COM 


R 

ISYSGEN.COM ;I put sysgen here so I can have a file with sysgen 
R ;and CP/M @ §00h saved (if this if not clear do it 
IMYBOOT .HEX ;the way CP/M suggests) 


Oprsc0 


 LDDSKBIOS . HEX 


R3980 

“Cc 

SAVE 34 SYSGEN60.COM ;(This way I have sysgen + the CP/M image in memory) 
SYSGEN60 ;You are on your own after this 


Good Luck John Monahen 


TYPE XMAIL,O0OC 
A Simple Mail Label System 


This simple mail label system requires only Basic-E for support. 
The following functions make up the system: 


XEDIT - 1) data entry of name and addressles) 
a pause after each name entry permits the 
end user to verify data prior to acceptance 
2) at end of session, enter END 
3) a simple bubble sort will ensue sorting 
the data in last name sequence 


*please note for those with large volumes of entry, 
replace the sort with a shell sort 


XMERGE -— merges the file SORT.FIL output from XEDIT 
with a master file designated by the user 


XSCAN - scans a user designated file 20 names per page 
permits the user to DELETE a designated 
name at a time with the ability to 
refresh the page if desired by the user 


*please note that the designated file is automatically updated 


XEXTRACT -1) scans a user designated file 20 names per page 
permits the user to EXTRACT and create a sub-file 
from a designated file one line at a time with 
the ability to refresh the page if desired 

2) the output file from XEXTRACT is called LIST.FIL 


*please note the file LIST.FIL should be renamed by the user 
fr * ) after generation from XEXTRACT 


XLIST - a simple !tist generation of the designated user file 
XLABELS —- a simple 3 up mail label run 
XFIND — a simple query of the designated user file 


XTEL - a simple query of telephone numbers in the file 


COMMENTS: This simple system assumes the console to have the 
cursor attributes of the Lear Siegler ADM31A. This can be easily 
altered by the user. The design of this mail label system 
eliminates the use of account numbers or other identifiers. 
Please feel free to modify it and specialize it for your specific 
requirements. The functions of XTEL and XFIND were added by Joe 
Schrabal. 


Hank Kee 
ACGNJ/NYACC 


a> 


POLY-VU 
#PV119 


. CA 99593 


K&M Company 


TORRANC 


Fant 
fd 


oO 


-SMCAT 

CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 
CATALOG 


029 
043 
044 
045 
046 
047 
048 
049 
050 
051 


CRCKLIST029 


SIG/M 

SIGMLOG 
SIGMLOG 
SIGMLOG 
SIGMLOG 
SIGMLOG 
SIGMLOG 
SIGMLOG 
SIGMLOG 


LIB 
004 
005 
006 
007 
008 
009 
010 
011 


20 file(s). 


38 directory entries remaining. 


C>STAT OO: 


File Not Found 


C>STAT O: 


Bytes Remaining On O: Ok 


~ > 


SIGMUG vol. 


29 


10/8/85 


POLY-vu 
#PV119 


K&M Company 
=. CA 99593 


TORRANC 


Si 


-SMCAT 030 1K 
CRCKLIST030 1K 
SIG/M LIB 2K 
SIGMLOG 012 1K 
SIGMLOG 013 15K 
SIGMLOG 014 1K 
SIGMLOG 016 17K 
SIGMLOG 017 8K 
SIGMLOG 018 5K 
SIGMLOG 019 29K 
SIGMLOG 020 3K 
SIGMLOG 021 15K 
SIGMLOG 022 9K 
SIGMLOG 023 38K 
SIGMLOG 024 7K 
SIGMLOG 025 41K 
SIGMLOG 026 20K 
SIGMLOG 027 3K 
SIGMLOG 028 24K 


19 file(s). 

37 directory entries remaining. 
C>STAT O: 

Bytes Remaining On O: 1k 


C> 


TYPE -SMCAT.030 


Sig/M.030 documentation addendum #2 of SIG/M and CPMUG 
catalog of public domain software volumes 


(original edition contained in Sig/M.015 and Sig/M.029) 


This volume contains the various *.DOC, ABSTRACT.*, READ.ME, etc 
files as contained in the CPMUG and-SIG/M volumes. This was 
compiled and published to facilitate ready reference of public 
domain software for the micro-hobbiests. 


CATALOG.nnn refers to a CPMUG release volume nnn 
SIGMLOG.nnn refers to a SIG/M release volume nnn 


a ela a a nen 


SIGMUG vol. 30 10/78/85 


POLY-vuU 
#PV119 


K&M Company 
=. CA 99503 


TORRANC 


S 


-~SMCAT 040 
ACKLIST 040 
CHARFREQBAS 
COMP2 ASM 
COMP2 COM 
CRCK COM 


. CRCKLIST040 
EXP2 ASM 
EXP2 COM 
HOST COM 
HOST DOC 
HOST PRN 
HOST Z80 
ISIS/CPMASM 
ISIS/CPMDOC 
MDS PRN 
MDS Z80 


MENU-V2 ASM 
MENU-V2 COM 
PAUSWAITASM 
QUMEDRV ASM 
QUMEINSTASM 


More.. 

RUN80 MEM 
RUN80 RNO 
RUN80-V2ASM 
RUN80-V2COM 
SIG/M LIB 
VMAP BAS 
VMAP DOC 
VMAP-SUBDOC 
XFERTIMEBAS 
31 file(s). 


SIGMUG vol. 


27 directory entries remaining. 


C>STAT O: 


Bytes Remaining On O: 4k 


C> 


40 


10/8/85 


LiPs 


jw WALA. JA) 


Miscellaneous System Support Utilities 


Sig/M volume 40 
-CATALOG.040 Contents of Sig/M volume 40 
ACKLIST.040 Acknowledgement File 
CRCKLIST.040 Checksum File 
40.01 ISIS/CPM.ASM 25K Prom Resident ISIS System Emulator 
40.02 ISIS/CPM.DOC 6K / 
40.03 VMAP.BAS 6K MBasic Variable Mapper 
40.04 VMAP.DOC 2K / 
40.05 VMAP-SUB.DOC 2K / 
40.06 QUMEDRV.ASM 4K Prom Resident Qume Driver 
40.07 QUMEINST.ASM 4K / 
40.08 CHARFREQ.BAS 2K Character Frequency Analysis 
40.09 XFERTIME.BAS 2K File Transfer Time Program for RCPM 
40.10 PAUSWAIT.ASM 8K Pause Option for SUBMIT ; 
40.11 COMP2.ASM 8K Text Compression Routine 
40.12 COMP2.COM 1K / 
40.13 EXP2.ASM 10K Text Expansion of COMP2 
40.14 EXP2.COM 1K / 
40.15 MENU-V2.ASM 18K Menu Driver 
40.16 MENU-V2.COM 1K / 
40.17 RUN80-V2.ASM 40K Text Formatter 
40.18 RUN80-V2.COM 4K / 
40.19 RUN80.MEM 10K f 
40.20 RUN80.RNO 9K / 
40.21 HOST.2Z80 10K File Load Between CP/M and 28000 
40.22 HOST .DOC 2K / 
40.23 HOST.COM 1K / 
40.24 MDS.280 14K MDS FDC Emulator 
40.25 MDS.PRN 16K / 


TYPE ACKLIST.040 


This is a collection of programs gathered over the last four 


months, that you may want to include in your SIG/M User's Group 
Library plus a 'variable mapper' for MBASIC programs by John 
Chang. 

Best regards to all... 

Kelly Smith, CP/M-Net SYSOP 

3055 Waco Ave. 

Simi Valley CA 93063 

System: (805) 527-9321 

Home: (805) 527-0518 
MDS.280 is the source for the control ROM for a simple S100 
resident intelligent disk controller which emulates (exactly) 


the disk controller of the MDS800. 


Author: 
Trevor Marshall, 


ns 


26 Mirrelia Way, Ferndale, Western Australia 6155 
phone International (619) 457 6059 National (09) 4576059 


cag is further documentation available: 

n article describing the S100 based disk controlle 

has been submitted to IEEE COMPUTER for sees 
publication. Copies are available from the author on request. 


= pide ? 
HOST.Z80 is a HOST utility to enable a CP/M system to be used 
to download /upload files from a Z8000 development system using 
the AMD 96-4016 Monitor. 
HOST.COM is the executable file. 
-cp 7 : 
-po 67 


Author: 

Trevor Marshall, 

26 Mirrelia Way, Ferndale, Western Australia 6155 

phone International (619) 457 6059 National (09) 4576059 


Submitted by: 
author 


These programs are public domain because: 
Thet were written by the author. 


To whom would this program be useful: 
Atl CP/M owners who were interested in the Z8000 


Briefly describe the program function: 

HOST enables a CP/M system to communicate with the AMD 96-4016 
Z8000 monitor via a serial date line. The CP/M system can LOAD 
or SAVE files from the Z8000, and the Z8000 has available all 
the storage facilities of the CP/M host. 

The AMC 96-4016 monitor uses 2 2716 EPROMS and can communicate 
via a parallel port (used in the SYS 8-8) or a serial USART. 


here is further documentation available: 

n article describing a Z8000 S100 based development system 
designed by the author has been submitted to IEEE COMPUTER for 
publication. Copies are available from the author on request. 

A list of the revisions to the AMC monitor devised by the 
author is available on request. 
The author will supply additional info on individual request. 


Hardware dependencies: 
Needs a Z8000 development system using the AMC monitor 


Software dependencies: 
requires CP/M 1.4 or 2.1 


Source processor: 
Has only been tested on a Z80 but should be OK on 8080 


Does the software "drop in": 


Yes 


How easy is the code to modify: 
.Z80 file is fairly well documented 


° 


> 


TYPE LS1S/CPM,.DO0UL 
ISIS/CPM Prom Resident Inte! ISIS System Emulator for CP/M 
Version 1.0 as of August 9, 1981 
° By: Mike Karas, Harold Scott, Kelly Smith 


No, this is NOT another ISIS to CP/M or CP/M to ISIS file 
transfer utility...this is a system emulator to allow utilization 
of the ISIS Operating System (and subsequent utilities] WITHOUT 
the exorbitant expense of an Intel development system BOOTED by 
a CP/M system! 


However, not without some penalty...first of all, you need 
Intel ISIS Version 4.0, then 60 kilobytes of contiguous RAM, the 
ISIS System Emulator PROM forg'ed at address F800 hex, and 
assembled from ISIS/CPM.ASM) on some sort of PROM board, a 
"standard' Tarbell floppy disk controller (single density), and 
finally the installation of the following 'patch' information to 
the ISIS diskette. Accomodation of other controller types should 
be rather easy by incorporating the changes you require, from 
your present CP/M disk BIOS. 


As set-up, the 'standard' Tarbell disk controller is used, 
with a DynaByte video board, and the usual stuff for a printer 
interface...change accordingly, to fit your system parameters. 


Please send any ‘bug' reports or comments via modem to’ the 
CP/M-Net System, (805) 527-9321 (60 to 710 Baud). It is not the 
intent of the authors to "rip-off" Intel Corporation...purchase a 
legitimate ISIS Version 4.0 diskette and any other programs’ you 

ay require (PL/M, etc.) from your Intel distributor...as_ for 
heir hardware... 


These are the patches (direct to Intet ISIS Version 4.0 
diskette, ISIS files: ISIS.BIN and ISIS.T0) required for 
utilization of the ISIS-CP/M PROM based boot loader, and may be 
installed easily with DU.COM from the SIG/M User's Group Volume 
21, File: 21.44. 


Note: 'Track' and 'Sector' are absolute decimal track and 
sector numbers, ‘Offset' is that absolute sector offset (128 byte 
sector) from a sector base address of 00h, 'Load Addr' is the 


absolute (memory image) of the data to be patched...and of 
course, change 'Old Data' to 'New Data', 


--- Patches to ISIS,BIN ---— 


Track Sector: Offset: Load Addr: Old Data: New Data: 

2 21 OSh 0834h db fc 3e ff 

2 21 10h O83bh d3 fc oo oO 

9 23 43h O96eh d3 fc 00 00 

2 24 04h OSefh d3 f3 00 oOo 

2 24 Oeh OSb9h d3 f3 oo oo 

4 23 58h 2303h d3 fc oo 00 

5 08 57h 2822h db 88 3e Ob 
oO 08 5ah 2885h db 78 3e Ob 
™S og 5dh 2888h db 68 38e 00 

5 08 74h 289fh db 89 3e 00 

5 08 77h 28a2h db 79 3e 00 

5 08 7ah 2B8a5h db 69 3e 00 

5 09 45h 28cO0h db 8b c9 c3 5c f8 

e 09 18h 28c3h db 7b cS c3 59 FB 


og 1bh 28cbh db 6b 8e O00 


Laney 
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Sector: 


34h 
87h 
8dh 
40h 
47h 
4ah 
74h 
7dh 
Qbh 
3dh 
46h 
54h 
5bh 


--- Patches 


Offset: 


71h 
76h 
04h 
23h 
72h 
3eh 
54h 
Oth 
08h 
69h 
21h 
24h 
3bh 
3eh 
58h 
5bh 
1ch 
2ch 
1eh 
38ch 
48h 
5eh 
6dh 
70h 
79h 
7ch 


28e2h 
28e8h 
28ebh 
28f2h 
28f5h 
291 fh 
2928h 
2936h 
2968h 
2971h 
297fh 
298bh 


to ISIS.TO --- 
Load Addr: 


3071h 
38076h 
3084h 
3223h 
8272h 
333eh 
8354h 
8601h 
3608h 
8669h 
36ath 
36a4h 
386bbh 
36beh 
36d8h 
386dbh 
371ch 
372ch 
371eh 
373ch 
37 48h 
375eh 
387edh 
37f0h 
37f3h 
37 fch 


f8 


8 


ete Ville enue 


VMAP maps variables used in Basic source file and prints the 
output listing either on the CRT terminal or to the line printer 
depending on the terminator selected. Variables are listed in 
alphabetical order with associate statement number where they 
appear. Multi-source files or segmented single file or any 
combination of both can be processed in a batch (unattended 
mode). .....if you think you can trust the system you're running 
on. 

The pre-requisites to use VMAP is to save all files you are 
mapping in ascii (i.e., SAVE"filename.BAS",drive number,A<cr>). 
Only ascii Basic source file can be used, since all source is 
saved in machine code. 

Once the file(s) is saved in ascii, run VMAP. Supply the 
answer to the prompt for file name, terminator (see appendix A), 
lower bound of the statement number to map, and the upper bound 
of the statement number to map. When the terminator is suppied 
as "END", the program begins to map all variables for all 
programs until completed (or when the program runs out of memory 
space). 

This program is very easily modifiable depending on what 
else you want it to process logging differenet properties of a 
Basic source file. To modify a Basic’ program without 
documentation, you'll find this program would help you more than 
anything else! 


pa 
Files included : VMAP.BAS & VMAP.DOC 
Version 1.0, Revision 1.0 
APPENDIX A 
Terminators used in this program are: 
END - end variable map program after processing the current 
file. 
Cc - continue with the next line of specifications. 
K ~- kill the source file after processing, and continue 
with the next file specification. 
O> 


° 


© 


22k VA TDUD.vUL 
CONTRIBUTION FORM FOR SIG/M LIBRARY 
NAME : John Chang DATE : 07/27/1981 
ADDRESS : 10025 De Soto Avenue #244 
CITY : Chatsworth STATE : Ca ZIP : 91311 
PHONE : 213-709-8191 AFFILIATION : Computer Enthusiast 


NAME OF PROGRAM : VMAP.BAS 


SOURCE LANGUAGE : MBASIC SYSTEM REQUIRED : CP/M 

MEMORY REQUIRED : enough to load MBASIC 

DESCRIPTION OF WHAT IT DOES: 

Print a listing of all (as much as memory allows) variables used 


in a Basic program in alphabetical order with associate statement 
numbers. 


HOW TO USE IT: 


Refer to VMAP.DOC 


PLEASE ATTACH ALL RELEVANT DOCUMENTATION AND A DISKETTE CONTAINING 

THE SOURCE, ASSEMBLY/COMPILATION/LINKAGE COMMAND FILES, OBJECT CODE, 
AND ANY OTHER MACHINE READABLE DOCUMENTATION. PLEASE USE THE FOLLOWING 
FILE EXTENSIONS: 


-ASM ~SOURCE FILE OR .BAS, .280, .FOR, .COB, ETC 
~DOC - DOCUMENTATION 
- COM -OBJECT CODE 


THE SUBMITTED FILES ARE IN THEIR PRESENT REVISION LEVEL, 
eeee TO THE BEST OF MY KNOWLEDGE CURRENTLY IN PUBLIC DOMAIN 


V1.0 UNDER MY DIRECT CONTROL HEREBY PLACED INTO PUBLIC 
DOMAIN. PERMISSION IS HEREBY GRANTED TO SIG/M TO 
DISTRIBUTE THE FILES FREELY FOR NON-COMMERCIAL 
PERSONAL USE. 


SIGNED : John W. Chang 
DATE : 07/27/1981 


SIG/M USER GROUP 

C/O AMATEUR COMPUTER GROUP OF NEW JERSEY 
UCTI 

1776 RARITAN ROAD 

SCOTCH PLAINS, NJ 07076 


POLY-VU 
#PV1I9 


K&M Company 
TORRANCE, CA 90503 


er 


SIGMUG vol. 45 


~SMCAT 045 1K 
ACTORS FTN 16K 
CLOCKR FTN 17K 
CRCKLISTO45 1K 
DEMONS FTN 19K 
DGAME FTN 10K 
DINIT FTN 12K 
DMAIN FTN 13K 
DSUB FTN 18K 
DUNGEO DOC 22K 
DVERB1 FTN 13K 
DVERB2 FTN 18K 
GDT FTN 15K 
OBJCTS FTN 21K 
READ ME 1K 
RRND MAG 2K 
RSXTIM MAC 1K 
SIG/M LIB 2K 
SVERBS FTN 18K 
VERBS FTN 21K 


20 file(s). 
36 directory entries remaining. 
A>STAT O: 


Bytes Remaining On O: Ok 


A>TYPE 0O:~—SMCAT.045 
Sig/M Volume 45 Dungeon — volume 1 of 3 


original code for PDP-11 


-CATALOG .045 contents of Sig/M volume 45 
released November 25, 1981 
CRCKLIST .045 checksum of Sig/M volume 45 


index name size description 

45 .01 ACTORS'~ .FTN 16K original code for Dungeon 
45 .02 CLOCKR’' .FTN 17K / 
45 .03 DEMONS’ .FTN 19K / 
45 .04 DGAME FTN 10K / 
45.05 DINIT .FTN 12K / 
45.06 DMAIN »FTN 13K / 

45 .07 DSUB .FTN 18K / 
45.08 DUNGEO' .DOC 22K / 

45.09 DVERB1 = .FTN 13K / 

45.10 DVERB2-~ .FTN 18K / 

45.11 GDT .-FTN 15K / 

45.12 OBJCTS' .FTN 21K / 

45.13 RRND -MAC 2K / 

45.14 RSXTIM~ .MAC 1K f 

45.15 SVERBS’~ .FTN 18K / 

45.16 VERBS ~FTN 21K / 


Copyright 1981 (C) by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


A> 


6/12/85 


SIGMUG vol. 46 6/12/85 


-SMCAT 046 1K 
CRCKLISTO46 1K 
D ODL 1K 
DTEXT DAT 221K 
LIGHTP FOR 6K 
RSTSCB CTL 2K 
RSXBLD CMD 1K 
RSXCMP CMD 1K 
RTBLD COM 1K 
RTCMP COM 1K 
SIG/M LIB 2K 
VMSBLD COM 1K 
VMSCMP COM 2K 
139i file(s). 

38 directory entries remaining. 
A>STAT O: 


Bytes Remaining On O: Ok 


A>TYPE O:—-SMCAT.046 
Sig/M Volume 46 Dungeon — volume 2 of 38 
original code for PDP-11 


-CATALOG .046 contents of Sig/M volume 46 
released November 25, 1981 

CRCKLIST .046 checksum of Sig/M volume 46 

index name size description 

46 .01. D ~ODL 1K original code for Dungeon 

46 .02 DTEXT DAT 221K / 
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TYPE O:DUNGEO.DOC 


To: Dungeon Players 
From: "The Translator" 
Subj: Game Information 


Date: 8-OCT-80 


This is the first (and tast) source release of the PDP-11 version of 
Dungeon. 


Please note that Dungeon has been superceded by the game ZORK(tm). 
The following is an extract from the new product announcement for 
ZORK in the September, 1980 issue of the RT-11 SIG newsletter: 


"'Z7ORK: The Great Underground Empire — Part I' ...was developed 
by the original authors based on their ZORK (Dungeon) game for 
the PDP-10. It features a greatly improved parser; command 
input and transcript output files; SAVEs to any device and 
file name; and adaptation to different terminal types, 
including a status line on VT100s. Note: this is not the 
FORTRAN version that has been available through DECUS. This 
version has been completely rewritten to run efficiently on 
small machines — up to 10 times as fast as the DECUS version. 


.»»ZORK runs under RT-I1, HT-II1, or RSTS/E and requires as 
tittle as 20K words of memory and a single floppy disk drive. 
The game package, consisting of an RX01-format diskette and 
an instruction booklet, is available from Infocom, Inc., 

P.O. Box 120, Kendall Station, Cambridge, Ma. 02142." 


ZORK(tm) is a trademark of Infocom, Inc. It is available for several 
popular personal computers as well as for the PDP-II. 

1. Components 

Dungeon is a maze-solving game for solitaire play. It runs on any PDP-11 


(with 28KW of memory or more) or VAX-11. Dungeon consists of the following 
files: 


all operating systems 
us DMAIN.FTN —-program root 
uf DGAME.FTN -main routine 
uf, DSUB .FTN -resident subroutines 
4) DINIT .FTN -initialization routine 
4INP .FOR —-parser, part 0 
u2NP1.FOR —-parser, part 1 
47 NP2@ «FOR -parser, part 2 
UTNPS .FOR -parser, part 3 
uf GDT .FTN -game debugging tool 
“uf VERBS .FTN -principal verbs 
uf OBJCTS .FTN -principal objects 
uf SVERBS .FTN -simple verbs 
us DVERB1.FT™N -auxiliary verbs, part 1 
“/DVERB2 FTN -auxiliary verbs, part 2 
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all operating systems (continued) 


4S ACTORS .FTN -character processors 
“? DEMONS .FTN -demon processors 
45 CLOCKR.FTN -clock event processors 
4? ROOMS .FOR —-room processors 
“7 NROOMS .FOR —new room processors 
47 S0BUS.FOR -simple objects 
YINOBJS.FOR —new objects 
Y7 BALLOP.FOR -balloon processor 
4b LIGHTP.FOR —-light processors 
uVILLNS .FOR -villain processors 
47DS01.FOR -overlaid subroutines, part 1 
7 DSO2.FOR -overlaid subroutines, part 2 
47DS03 .FOR -overlaid subroutines, part 3 
u7DS04.FOR ~-overlaid subroutines, part 4 
47 DS05.FOR -overlaid subroutines, part 5 
47 DSO6 .FOR -overlaid subroutines, part 6 
41DS07 .FOR -overlaid subroutines, part 7 
4 DINDX DAT -initialization data base 
4CDTEXT .DAT -main data base [binary file] 
4S DUNGEO .DOC -this file 

RT11 only 
AV RTTIM.FOR -time subroutine 
uf RRND .MAG -random number generator 
4% RTCMP .COM -compile command file 
4YUGRTBLD.COM -link command file 

RSTS/E only 
UI RTTIM.FOR -time subroutine 
US RRND .MAG -random number generator 
M&RASTSCB.CTL -compile/build batch file 


RSX11M, RSX11M+ only 


uf RSXTIM .MAC -time subroutine 
uy RRND .MAC -rpandom number generator 
yb RSXCMP .CMD -compile command file 
ub RSXBLD .CMD -task build command file 
4bD.ODL -overlay descriptor file 
VMS only 
u7 VMSTIM.FOR -time subroutine 
VMSRND .MAC -random number generator 
ub VMSCMP .COM -compile command file 
“4 VMSBLD.COM —ltink command file 


Du4efo4 ~ 


TYPE RTCMP.COM from vol.46 Sigmug tor Dungeon Game 
COM/NOLINE DMAIN.FTN,DGAME.FTN,DSUB.FTN 

COM/NOLINE DINIT.FIN 

COM/NOLINE NP,NP1,NP2,NP3 

COM/NOLINE/NOVEC GDT.FTN 

COM/NOLINE VERBS.FTN,OBJCTS.FITN 

COM/NOLINE SVERBS.FTN,DVERB1.FTN,DVERB2.FTN,ACTORS.FTN,DEMONS.FTN,CLOCKR. FTN 
COM/NOLINE ROOMS.FOR,NROOMS.FOR 

COM/NOLINE SOBJS.FOR,NOBJS.FOR,BALLOP.FOR, LIGHTP.FOR,;VILLNS.FOR 
COM/NOLINE DSO1.FOR,DSO2.FOR,DSO3.FOR,DSO4.FOR,DSO5.FOR,DSO6.FOR,DSO7.FOR 
COM/NOLINE RTTIM.FOR 

COM RRND.MAC 


FROM? 


O>TYPE RTBLD.COM FROM vol. 46 for Dungeon Game 

LINK/ INCLU/PRO/MAP:NL:/BOT:1200/EXE:DUNGEO DMAIN,DGAME,DSUB,RRND,RTTIM 
DINIT,GDT/O:1 

NP,NP1,NP2,NP3/0:1 

VERBS ,OBJCTS/O:1 

SVERBS/O:2 

DVERB1/0:2 

DVERB2/0:2 

ACTORS/0:2 

DEMONS/O:2 

CLOCKR/O:2 

ROOMS/0O:3 

NROOMS/0:3 “ 
SOBJS/0:3 P| 
NOBJS/0:3 \ 
BALLOP, LIGHTP, VILLNS/0:3 i 
DSO1/0:4 Hi 
DSO2/0:4 : 
DSO3/0:4 

DSO4/0:4 

DSO5/0:4 

DSO6/0:4 

DSO7/0:4// 

$SHORT 


FROM? 


O> 


TYPE RSTSCB.CTL FOR DUNGEON 
$JOB/NAME=DUNGEO 
$! 
$!Job to compile and link Dungeon under RSTS/E 
$! 
$!First compile Fortran-IV modules 
$! 
SRUN $FORTRA 
DMAIN=DMAIN.FTN/S/V 
DGAME=DGAME.FTN/S/V 
DSUB=DSUB.FTN/S/V 
DINIT=DINIT.FTN/S/V 
GDT=GDT.FTN/S/V 
NP=NP.FOR/S/V 
NP1=NP1.FOR/S/V 
NP2=NP2.FOR/S/V 
NP3=NP3.FOR/S/V 
VERBS=VERBS.FTN/S/V ee 
OBJCTS=OBJCTS.FIN/S/V 
SVERBS=SVERBS.FTN/S/V 
DVERB1=DVERB1.FTN/S/V 


DVERB2=DVERB2.FTN/S/V ; x i 
ACTORS=ACTORS.FTN/S/V 
DEMONS=DEMONS.FTN/S/V : 
CLOCKR=CLOCKR.FTN/S/V 

ROOMS=ROOMS.FOR/S/V \ 
NROOMS=NROOMS. FOR/S/V 

SOBJS=SOBUJS.FOR/S/V 

NOBJS=NOBJS.FOR/S/V 

BALLOP=BALLOP.FOR/S/V 

LIGHTP=LIGHTP.FOR/S/V 

VILLNS=VILLNS.FOR/S/V 

DSO1=DSO1.FOR/S/V 

DSO2=DSO02.FOR/S/V 

DSO3=DS0O3 ..FOR/S/V 

DSO4=DS04.FOR/S/V 

DSO5=DS05.FOR/S/V 

DSO6=DSO6.FOR/S/V 

DSO7=DS0O7.FOR/S/V 

RTTIM=RTTIM.FOR/S/V 

$! 

$!Next assemble Macro~1ll modules 

$! 

SRUN $MACRO 

RRND=RRND 

$! 

$!Finally link all components 

$! 

SRUN SLINK 

DUNGEO=DMAIN,DGAME,DSUB, RRND, RTTIM/F/B:1200// 
DINIT,GDT/0:1 

NP,NP1,NP2,NP3/0:1 

VERBS ,OBJCTS/0:1 

SVERBS/0O:2 

DVERB1/0:2 

DVERB2/0:2 

ACTORS/O:2 

DEMONS/O:2 

CLOCKR/0O:2 

ROOMS/0O:3 

NROOMS/0O:3 

SOBJS/0:3 

NOBJS/0:3 

BALLOP, LIGHTP, VILLNS/0:3 

DSO1/0:4 

NS02/0:4 


DSO3/0:4 
DSO4/0:4 
pSo5/0:4 
DSO6/0:4 
DSO7/0:4// 
$1 

$!Done 

$1 

SEOJ 


FOR? 


O> 


Lt 
F4p 
F4p 
F4pP 
F4p 
F4p 
F4p 
F4p 
F4p 
F4p 
F4p 
F4pP 
F4pP 
F4pP 
F4pP 
F4pP 
F4pP 
F4pP 
F4P 
F4P 
FAP 
FAP 
F4P 
F4P 
F4p 
F4pP 
F4pP 
F4P 
F4P 
F4pP 
F4pP 
F4P 
MAC 
MAC 


FOR? 


PE RSAXCMP.CMD 
DMAIN=DMAIN.FTN/CO: 20 
DGAME=DGAME.FTN/CO: 20 
DSUB=DSUB.FTN/CO: 20 
DINIT=DINIT.FTN/CO:20 
GDT=GDT.FTN/CO:20 
NP=NP.FOR/CO: 40 
NP1=NP1.FOR/CO: 40 
NP2=NP2.FOR/CO: 40 
NP3=NP3.FOR/CO: 40 
VERBS=VERBS.FTN/CO: 20 
OBJCTS=OBJCTS.FTN/CO: 20 
SVERBS=SVERBS.FTN/CO: 20 
DVERB1=DVERB1.FTN/CO: 20 
DVERB2=DVERB2.FTN/CO: 20 
ACTORS=ACTORS.FTN/CO: 20 
DEMONS=DEMONS.FTN/CO: 20 
CLOCKR=CLOCKR.FTN/CO: 20 
ROOMS=ROOMS.FOR/CO: 20 
NROOMS=NROOMS. FOR/CO: 20 
SOBJS=SOBJS.FOR/CO: 20 
NOBJ S=NOBUS.FOR/CO: 20 
BALLOP=BALLOP.FOR/CO: 20 
LIGHTP=LIGHTP.FOR/CO: 20 
VILLNS=VILLNS.FOR/CO: 20 
DSO1=DSO1.FOR/CO: 20 
DSO2=DSO2.FOR/CO: 20 
DSO3=DSO3.FOR/CO: 20 
DSO4=DS04.FOR/CO: 20 
DSO5=DSO5.FOR/CO: 20 
DSO6=DS06.FOR/CO: 20 
DSO7=DSO7. FOR/CO: 20 
RSXTIM=RSXTIM 

RRND=RRND 


O>TYPE RSXBLD.CMD 


DUNGEON/CP/FP=D.ODL/MP 
STACK=384 
ASG=SY:1:2:3:4,TI:5,C0:6 
FOR? 

O>TTYPE D.ODL 

TTYPE? 


O>TYPE D.ODL 
- ROOT R1,R2,R3,R4, [1,1] SYSLIB.OLB/DL 
-FCTR RIRES-* (R10,R11,R12,R13) 


Rl: 

RLRE 
R10: 
Rll: 
R12: 
R13: 


R2: 

R20: 
R21: 
R22: 
R23: 
R24: 
R25: 


R3: 
R30: 


FUR DUNGEON 


FOR DUNGEON 


FOR DUNGEON 


FOR DUNGEON 


S:. .FCTR DMAIN-DGAME-DSUB-RSXTIM-RRND 
-FCTR DINIT 
-FCTR GDT 
.FCTR NP-NP1-NP2-NP3 
-FCTR VERBS-OBJCTS 


- NAME ROOT2 


-FCTR *ROOT2-*(R20,R21,R22,R23,R24,R25) 


.FCTR SVERBS 
-FCTR DVERB1 
.FCTR DVERB2 
-FCTR ACTORS 
-FCTR DEMONS 
-FCTR CLOCKR 


- NAME ROOT3 


-FCTR *ROOT3-*(R30,R31,R32,R33,R34) 


«FCTR ROOMS 


R31: eFCTR 
R32: -FCTR 
R33: -FCTR 
R34: -FCTR 

- NAME 
R4: -FCTR 
R40: -FCTR 
R41: -FCTR 
R42: -FCTR 
R43: .FCTR 
R44: -FCTR 
R45: -FCTR 
R46: -FCTR 

. END 
FOR? 


O> 


ROOT4 


*ROOT4-* (R40 ,R41,R42,R43,R44,R45,R46) 


NRUUMS 
SOBJS 
NOBJS 


BALLOP-LIGHTP-VILLNS 


DSOl1 
DSO2 
DSO3 
DSO4 
DSO5 
DSO6 
DSO7 


firs VSM 
VSM? 


O>TYPE VMSCMP.COM 

FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/ NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/ NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/ NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
_ FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTI NUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
FORTRAN/NOCHECK/NOI 4/CONTINUATIONS=40 
MACRO VMSRND.MAC 


FOR? 


O>TYPE VMSBLD.COM FOR DUNGEON 


LINK/EXECUTABLE=DUNGEON DMAIN,DGAME,DSUB,VMSRND,VMSTIM,-— 


DINIT,GDT,NP,NP1,NP2,NP3,- 
VERBS , OBJCTS ,- 

SVERBS ,DVERB1 ,DVERB2,- 
ACTORS , DEMONS , CLOCKR,- 
ROOMS ,NROOMS, SOBJS, NOBJS, - 
BALLOP, LIGHTP, VILLNS,- 
DSO1.DS02,DS03 ,DS04,- 
DSO5,DS06 ,DSO7 


FOR? 


O> 


FOR DUNGEON 


DMAIN. FIN 
DGAME.FTN 
DSUB.FTN 
DINIT.FIN 
GDT.FTN 
NP.FOR 
NP1.FOR 
NP2.FOR 
NP3.FOR 
VERBS.FIN 
OBJCTS.FTN 
SVERBS.FTN 
DVERB1.FTN 
DVERB2.FTN 
ACTORS. FTN 
DEMONS.FIN 
CLOCKR.FTN 
ROOMS.FOR 
NROOMS.FOR 
SOBJS.FOR 
NOBJS.FOR 
BALLOP. FOR 
LIGHTP.FOR 
VILLNS.FOR 
DSO1.FOR 
DSO2.FOR 
DSO3.FOR 
DSO4.FOR 
DSO5.FOR 
DSO6.FOR 
DSO7.FOR 
VMSTIM.FOR 


2. Installation Instructions, RT11 
Before starting, please note that: 


— Dungeon requires RT11 V3 or later. 
- Dungeon requires Fortran-IV V2 or later, threaded code option. 
- Dungeon requires 26KW of user memory (runs under SJ monitor only). 


- All files (source and object) must reside on the same disk 
(at least 2500 disk blocks are needed). 


- Dungeon does not require EIS or floating point. 
Except for DTEXT.DAT, all files in the distribution kit are ASCII. 
DTEXT.DAT is a binary file consisting of 76-byte fixed length records. 
If the distribution kit consists of RT11-compatible media, then PIP 
can be used to transfer the files. If the distribution kit consists 
of DOS-compatible media, then FILEX must be used to transfer the files. 


The /I switch (image binary) must be used to transfer DTEXT.DAT; the 
7A (ASCII) switch should be used to transfer the other files. 


To compile Dungeon, issue the following command: 
-@RTCMP (cr) 


Several of the compilations will produce warning messages, but none 
should produce a fatal error. 


To link the compiled sources, issue the following command: 
-@RTBLD(cr} 
The command file assumes that the Fortran-IV object time library has 
been merged into the system library. If this is not the case, edit 
RTBLD.COM and add switch /LINKLIBRARY:FORLIB.OBJ to the first command 
line. 
It is now possible to run Dungeon: 
-R DUNGEO(cr) 
When invoked, Dungeon takes no more than 5-10 seconds to start up. 


Notes on the executable program: 


- The only files needed to axecute Dungeon are DUNGEO.SAV, 
DINDX.DAT, and DTEXT.DAT. AIl other files can be deleted. 


- Files DINDX.DAT and DTEXT.DAT must reside on logical device SY: 
(this can be changed with a source edit, see section 8). 
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8. Installation Instructions, RSTS/E 
Before starting, please note that: 
- Dungeon requires RSTS/E V6C or later. 


- Dungeon requires Fortran-IV V2 or later, threaded code option 
*] (operation under Fortran-IV-Plus V2.5 or later will probably 
work but is not supported). 


- Dungeon requires 28KW of user memory. 


- All files (source and object) must reside in the same user area 
(at least 2500 disk blocks are needed). 


- Dungeon does not require EIS or floating point. 


Except for DTEXT.DAT, all files in the distribution kit are ASCII. 
DTEXT.DAT is a binary file consisting of 76-byte fixed length records. 
If the distribution kit consists of RT11—- or DOS-compatible disks, 
then FIT can be used to transfer the files. For example (RT11 disk): 


RUN $FIT(cr) 
FIT>*.*/RSTS=DK:*.*/RT11 (cr) 
FIT>*Z 


If the distribution kit consists of DOS-compatible magtape, then PIP 
can be used to transfer the files, providing that the magtape is 
assigned as a DOS-label device. For example: 


ASSIGN MMO: .DOS(cr) 
RUN $PIP(cr) 

+] **  */AS=MM:* FTN, *.FOR, *.MAC,*.DOC,*.CTL(cr) 
**  */AS=MM:*.CMD,*.COM,*.ODL,DINDX.DAT(cr) 
** |*/BL=MM:DTEXT.DAT(cr) 
*° 
DEASS MMO:(cr) 


To compile and tink Dungeon, submit control file RSTSCB.CTL to the 
batch processor: 


SUBMIT RSTSCB.CTL(cr) 


Several of the compilations will produce warning messages, but none 
should produce a fatal error, 


It is now possible to run Dungeon: 

RUN DUNGEO([cr) 
When invoked, Dungeon takes no more than 5-10 seconds to start up. 
Notes on the executable program: 


- The only files needed to execute Dungeon are DUNGEO.SAV, 
DINDX.DAT, and DTEXT.DAT. AIl other files can be deleted. 


—- Files DINDX.DAT and DTEXT.DAT must reside in the user's area on 
re] logical device SY: (this can be changed with a source edit, see 
section 8). 
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4. Installation Instructions, RSX11M and RSX11M+ 
Before starting, please note that: 
- Dungeon requires RSX11M V3 (RSX11M+ V1) or later. 


- Dungeon requires Fortran-IV-Plus V2.5 or later (operation under 
Fortran-IV V2 or later will probably work but is not supported). 


- Dungeon requires a 32KW user partition (mapped systems only). 


- All files (source and object) must reside in the same user area 
{at least 2500 disk blocks are needed). 


- TKB should invoke BIGTKB.TSK with a large memory increment. 


- The Fortran-IV-Plus object time library must be merged into 
the system library (SYSLIB.OLB). Further, the library must 
be set up to invoke the short error text module ($SHORT) as 
the default. Task building with a separate object time library 
produces numerous errors; task building with a resident library 
or the normal error text module produces an oversize task image. 


- Dungeon requires EIS but not floating point. 


Except for DTEXT.DAT, all files in the distribution kit are ASCII. 
DTEXT.DAT is a binary file consisting of 76-byte fixed length records. 
If the distribution kit consists of Files-11 compatible media, then 
PIP can be used to transfer the files. For example: 


>PIP SY:*.*=MM:*.*(cr) -requires ANSI magtape support 
If the distribution kit consists of DOS- or RT11-compatible media, 
then FLX must be used to transfer the files. The /IM:76. switch 
(image binary fixed length) must be used to transfer DTEXT.DAT; 
the /FA switch (formatted ASCII) should be used to transfer the 
other files. For example (DOS magtape): 
>FLX(C cr} 
FLX>SY:/RS/FA=MM:*,FTN, *.FOR,*.MAC,*.DOC/DO(cr) 
FLX>SY:/RS/FA=MM:*.CMD,*.COM,*.ODL,DINDX.DAT/DO(cr) 
FLX>SY:/RS/IM:76 .=MM:DTEXT .DAT/DO(cr) 
FLX>*Z 
To compile Dungeon, issue the following command: 
>@RSXCMP(cr) 
There should be no error messages, 
To task build the compiled sources, issue the following command: 
>TKB @RSXBLD(cr) 
It is now possible to run Dungeon: 


>RUN DUNGEON(cr) 


When invoked, Dungeon takes no more than 5-10 seconds to start up. 
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If your system maintains a separate Fortran-IV-Plus object time 
library (F4POTS.OLB), then you must create a local copy of the 
system library with the Fortran-IV-Plus object time library 
merged in and the short error text as the default. The following 
commands are an example of how such a local copy could be built: 


>PIP SY:*.*=LB:[1,1]SYSLIB.OLB,F4POTS.OLB(cr) -copy libraries 


>LBR( cr) -invoke LBR 

LBR>SHORT .OBJ=F4POTS .OLB/EX: $SHORT(cr) -extract $SHORT 
LBR>F4POTS .OLB/DE: $SHORT(cr) -delete $SHORT 
LBR>F4POTS .OBJ=F4POTS .OLB/EX(cr) -extract other modules 
LBR>SYSLIB.OLB=F4POTS .OBUJ(cr}) -insert other modules 
LBR>SYSLIB.OLB/DG: $ERTXT(cr) -delete dup entry 
LBR>SYSLIB.OLB=SHORT .OBJ/RP(cr) -insert $SHORT 

LBR>“*Z 


>PIP F4POTS.*;*,SHORT .OBJ;*/DE(cr) 


Then edit D.ODL to reference the !ocal library instead of the 
default system library: 


>TEC D.ODL(cr) 
*FS[1,11$SY:$EX$$ 


Dungeon can now be task built as described above. 
Notes on the executable program: 


- The only files needed to execute Dungeon are DUNGEON.TSK, 
DINDX.DAT, and DTEXT.DAT. Atl other files can be deleted. 


- Files DINDX.DAT and DTEXT.DAT must reside in the user's area on 


logical device SY: (this can be changed with a source edit, see 
section 8). 


- Exiting from Dungeon via an MCR ABOrt command instead of the QUIT 
command will leave file DTEXT.DAT open and locked. The file must 
be manually unlocked before the game is next invoked: 


>PIP DTEXT.DAT/UN(cr) 
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5. Installation Instructions, VMS 
Before starting, please note that: 


- Dungeon requires VMS V1 or later. 
- Dungeon requires VAX Fortran-IV V1 or later. 


- All files (source and object) must reside in the user's area 
(at least 2500 disk blocks are needed). 


Except for DTEXT.DAT, all files in the distribution kit are ASCII. 
DTEXT.DAT is a binary file consisting of 76-byte fixed length records. 
If the distribution kit consists of Files-11 compatible media, then 
COPY can be used to transfer the files. For example: 


$ COPY MM:*.* *,*(cr) 
If the distribution kit consists of DOS- or RT11-compatible media, 
then FLX must be used to transfer the files. The /IM:76. switch 
(image binary fixed length) must be used to transfer DTEXT.DAT; 
the /FA switch (formatted ASCII) should be used to transfer the 
other files. For example (DOS magtape): 
$ MCR FLX(cr) 
FLX>SY:/RS/FA=MM:*.FITN, *.FOR, *.MAC,*.DOC/DO(cr}) 
FLX>SY:/RS/FA=MM:*.CMD, *.COM, *.ODL,DINDX.DAT/DOl[cr) 
FLX>SY:/RS/IM:76 .=MM:DTEXT.DAT/DO(cr) 
FLX>*Z 
To compile Dungeon, issue the following command: 
$ @VMSCMP(cr) 
There should be no error messages. 
To link the compiled sources, issue the following command: 


$ @VMSBLD(cr) 
It is now possible to run Dungeon: 

$ RUN DUNGEON(cr) 
When invoked, Dungeon takes no more than 5-10 seconds to start up. 
Notes on the executable program: . 


- The onty files needed to execute Dungeon are DUNGEON.EXE, 
DINDX.DAT, and DTEXT.DAT. Atl other files can be deleted. 


- Files DINDX.DAT and DTEXT.DAT must reside in the user's area 
(this can be changed with a source edit, see section B). 
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6. Warnings and Restrictions 


For those familiar with the MDL version of the game on the ARPAnet, 
the following is a list of the major incompatabil ties: 


-The first six letters of a word are considered 
significant, instead of the first five. 

-The syntax for TELL, ANSWER, and INCANT is different. 

-Compound objects are not recognized. 

-Compound commands can be delimited with comma as well 
as period. 


Also, the palantir, brochure, and dead man problems are nat 
implemented. 


7. Abstract of Informational Printouts 


SUMMARY 


Welcome to Dungeon! 


Dungeon is a game of adventure, danger, and tow cunning. In it 
you will explore some of the most amazing territory ever seen by mortal 
man. Hardened adventurers have run screaming from the terrors contained 
within. 


In Dungeon, the intrepid explorer delves into the forgotten secrets 
of a lost labyrinth deep in the bowels of the earth, searching for 
vast treasures long hidden from prying eyes, treasures guarded by 
fearsome monsters and diabolical traps! 


No DECsystem should be without one! 


Dungeon was created at the Programming Technology Division of the MIT 
Laboratory for Computer Science by Tim Anderson, Marc Blank, Bruce 
Daniels, and Dave Lebling. It was inspired by the Adventure game of 
Crowther and Woods, and the Dungeons and Dragons game of Gygax 
and Arneson. The original version was written in MDL (alias MUDDLE). 
The current version was translated from MDL into FORTRAN IV by 
a somewhat paranoid DEC engineer who prefers to remain anonymous. 


On-line information may be obtained with the commands HELP and INFO. 
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INFO 


Welcome to Dungeon! 


You are near a large dungeon, which is reputed to contain vast 
quantities of treasure. Naturally, you wish to acquire some of it. 
In order to do so, you must of course remove it from the dungeon. To 
receive full credit for it, you must deposit it safely in the trophy 
case in the living room of the house. 


In addition to valuables, the dungeon contains various objects 
which may or may not be useful in your attempt to get rich. You may 
need sources of tight, since dungeons are often dark, and weapons, 
since dungeons often have unfriendly things wandering about. Reading 
material is scattered around the dungeon as well; some of it 
is rumored to be useful. 


To determine how successful you have been, a score is kept. 
When you find a valuable object and pick it up, you receive a 
certain number of points, which depends on the difficulty of finding 
the object. You receive extra points for transporting the treasure 
safely to the living room and placing it in the trophy case. In 
addition, some particularly interesting rooms have a value associated 
with visiting them. The only penalty is for getting yourself killed, 
which you may do only twice. 


Of special note is a thief (always carrying a large bag) who 
likes to wander around jin the dungeon (he has never been seen by the 
light of day). He likes to take things. Since he steals for pleasure 
rather than profit and is somewhat sadistic, he only takes things which 
you have seen. Although he prefers valuables, sometimes in his haste 
he may take something which is worthless. From time to time, he examines 
his take and discards objects which he doesn't like. He may occas— 
jonally stop in a room you are visiting, but more often he just wanders 
through and rips you off (he is a skilled pickpocket). 


HELP 


Useful commands: 


The 'BRIEF' command suppresses printing of long room descriptions 
for rooms which have been visited. The 'SUPERBRIEF' command suppresses 
printing of long room descriptions for all rooms. The 'VERBOSE'! 
command restores long descriptions. 

The 'INFO' command prints information which might give some idea 
of what the game is about. 

The 'QUIT' command prints your score and asks whether you wish 
to continue playing. 

The 'SAVE' command saves the state of the game for later continuation. 

The 'RESTORE' command restores a saved game. 

The 'INVENTORY' command lists the objects in your possession. 

The 'LOOK' command prints a description of your surroundings. 

The 'SCORE' command prints your current score and ranking. 

The 'TIME' command tells you how long you have been playing. 

The 'DIAGNOSE' command reports on your injuries, if any. 
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Command abbreviations: 


The 'INVENTORY' command may be abbreviated 'I'. 
The 'LOOK' command may be abbreviated 'L'. 
The 'QUIT' command may be abbreviated 'Q'. 


Containment: 


Some objects can contain other objects. Many such containers can 
be opened and closed. The rest are always open. They may or may 
not be transparent. For you to access (e.g., take) an object 
which is in a container, the container must be open. For you 
to see such an object, the container must be either open or 
transparent. Containers have a capacity, and objects have sizes; 
the number of objects which will fit therefore depends on their 
sizes. You may put any object you have access to (it need not be 
in your hands} into any other object. At some point, the program 
will attempt to pick it up if you don't already have it, which 
process may fail if you're carrying too much. Although containers 
can contain other containers, the program doesn't access more than 
one level down. 


Fighting: 


Occupants of the dungeon will, as a rule, fight back when 
attacked. In some cases, they may attack even if unprovoked. 
Useful verbs here are ‘ATTACK <villain> WITH <weapon>', 'KILL', 
etc. Knife-throwing may or may not be useful. You have a 
fighting strength which varies with time. Being in a fight, 
getting killed, and being injured all lower this strength. 
Strength is regained with time. Thus, it is nat a good idea to 
fight someone immediately after being killed. Other details 
should become apparent after a few melees or deaths. 


Command parser: 


A command is one line of text terminated by a carriage return. 
For reasons of simplicity, all words are distinguished by their 
first six letters. All others are ignored. For example, typing 
"DISASSEMBLE THE ENCYCLOPEDIA' is not only meaningless, it also 
creates excess effort for your fingers. Note that this trunca— 
tion may produce ambiguities in the intepretation of longer words. 


You are dealing with a fairly stupid parser, which understands 
the following types of things-—- 


Actions: 
Among the more obvious of these, such as TAKE, PUT, DROP, etc. 
Fairly general forms of these may be used, such as PICK UP, 
PUT DOWN, etc. 


Directions: 
NORTH, SOUTH, UP, DOWN, etc. and their various abbreviations. 
Other more obscure directions (LAND, CROSS) are appropriate in 
only certain situations, 
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Objects: 
Most objects have names and can be referenced by them. 


Adjectives: 
Some adjectives are understood and required when there are 
two objects which can be referenced with the same 'name' (e.g., 
DOORs, BUTTONS). 


Prepositions: 
It may be necessary in some cases to include prepositions, but 
the parser attempts to handle cases which aren't ambiguous 
without. Thus 'GIVE CAR TO DEMON' will work, as will 'GIVE DEMON 
CAR'. 'GIVE CAR DEMON' probably won't do anything interesting. 
When a preposition is used, it should be appropriate; ‘GIVE CAR 
WITH DEMON' won't parse. 


Sentences: 
The parser understands a reasonable number of syntactic canstruc— 


tions. In particular, multiple commands (separated by commas) 
can be placed on the same line. 


Ambiguity: 
The parser tries to be clever about what to do in the case of 
actions which require objects that are not explicitly specified. 
If there is only one possible object, the parser will assume 
that it should be used. Otherwise, the parser will ask. 
Most questions asked by the parser can be answered. 
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8. 


A> 


Source Notes 
few notes for source hackers. 


The initialization module (DINIT.FITN) includes an access protection 
function PROTCT. If PROTCT returns a value of .TRUE., the game is 
permitted to start; if PROTCT returns .FALSE., the game is 
terminated with a suitably nasty message. At present, PROTCT is a 
dummy routine and always returns .TRUE.; by tailoring PROTCT, 
access to the game can be restricted to certain hours or users. 


The data base OPEN and READ statements are in the initialization 


module (DINIT.FTN). The date base file names are simply "DINDX.DAT" 
and "DTEXT.DAT". These may be freely changed to include logical 
device names, UIC's, etc. Thus, it is possible to place the data 
base files on different devices, in a fixed UIC, etc. 


Converting the game to another processor is not a straightforward 
procedure. The game makes heavy use of extended and/or 
idiosynchratic features of PDP-11 Fortran. Particular nasties 
include the following: 

> The game vocabulary is stored in Radix-50 notation. 

> The game uses the extended I/O commands OPEN and CLOSE. 


> The game uses LOGICAL*1 variables for character strings. 


> The game uses logical operators on integers for bitwise binary 
operations. 


> The game treats certain arrays and variables as unsigned 
16-bit integers (integer overflow may occur). 


In general, the game was implemented to fit in memory, not to be 
transported. You're on your own, friend! 
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SIGMUG vol. 47 6/12/85 


-SMCAT 047 4K 
BALLOP FOR 7K 
CRCKLISTO47 4K 
DINDX DAT 49K 
DSOo1 FOR 6K 
Dsoe FOR 8K 
Dso3 FOR 4K 
DSo4 FOR 7K 
DSO5 FOR 5K 
DSO6 FOR 6K 
DSO7 FOR 7K 
NOBJS FOR 20K 
NP FOR 5K 
NP1 FOR 25K 
NP2 FOR 6K 
NP3 FOR 10K 
NROOMS' FOR 15K 
ROOMS FOR 18K 
RTTIM FOR 1K 
SIG/M LIB 2K 
SOBJS FOR 18K 
VILLNS FOR 19K 
More.. 

VMSTIM FOR 1K 


23 file(s). 
383 directory entries remaining. 
A>STAT O: 


Bytes Remaining On O: Ok 


A>TYPE 0:-SMCAT .047 
Sig/M Volume 47 Dungeon — volume 3 Of 3 


original code for PDP-11 


-CATALOG .047 contents of Sig/M volume 47 
released November 25, 1981 

CRCKLIST .047 checksum of Sig/M volume 47 

index name size - description 

47 .01 BALLOP  .FOR 7K original code for Dungeon 

47 .02 DINDX DAT 49K 

47.03: DSso1 .FOR 6K / 

47 .04 pso2 .-FOR 8K / 

47.05 DSsOo3 .-FOR 4K / 

47 .06 Dso4 .FOR 7K / 

47 .07 DSO5 .FOR 5K J 

47 .08 Dso6 »FOR 6K / 

47.09 DSO7 . FOR 7K / 

47.10 NOBJS FOR 20K / 

47.11 NP »FOR 5K / 

47.12 NP1 .FOR 25K / 

47.131 NP2 .FOR 6K / 

47.14 NP3 .FOR 10K / 

47.15 NROOMS’~ .FOR 15K / 

47.16 ROOMS FOR 18K / 

47 .17 RTTIM FOR 1K / 

47.18 SOBJS FOR 18K / 

47.19 VILLNS~ .FOR 19K / 

47 .20 VMSTIM~ .FOR 1K / 


Copyright 1981 (C) by Sig/M-Amatesur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ 08830-0097 


gree eh 2 Beso wt 8 2% 
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K&M Company 
TORRANCE.CA 90503 
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-SMCAT O48 
ACKLIST 048 
CARRY12 ASM 
CRCK COM 
CRCKLISTO43 
MODEM7 DOC 
MODEM7 LIB 
MODEM7 SET 
MODEM73 ASM 
MODEM73 OBJ 
SENDOUT3 ASM 
SIG/M LIB 
SINGSSM DOC 
sQ COM 
UNSPOOL ASM 
UNSPOOL DOC 
USQ COM 
USRDFLT2CCP 
USRPW34 ASM 
XMODEM46ASM 
20 file(s). 


1K 
14K 
13K 

8K 
10K 
15K 
17K 
39K 


SIGMUG vol. 


38 directory entries remaining. 


A>STAT O: 


Bytes Remaining On 0: 


A>SINGSSM.DOC a file found in place of -~SMCAT.048 which was later replaced. 


48 


Filed Undtr Modem 925K 


6/12/85 (updated 11/3/85) 


TYPE -SMCAT.048 


Sig/M Volume 48 Communication Utilities 
Miscellaneous CP/M Support 
-CATALOG.048 contents of Sig/M volume 48 
released November 25, 1981 
ACKLIST.0O48 acknowledgement file 
CRCKLIST.048 checksum of Sig/M volume 48 
index name size description 
48.01 CARRY12 .ASM 6K pause prior to load of .COM files 
48.02 MODEM7 .DOC 16K update of Modem7 program 
48.03 MODEM7 ~LIB 14K / 
48.04 MODEM? .SET 3K / 
48.05 MODEM73 .ASM 63K / 
48.06 MODEM73 .OBJ 10K / 
48.07 SENDOUT3.ASM 5K sendout utility for PMMI 
48.08 UNSPOOL .ASM 13K DESPOOL look-alike 
48.09 UNSPOOL .DOC 8K / 
48.10 USRDFLT2.CCP 15K pseudo CCP User 
48.11 USRPW34 .ASM 17K password for User access control 
48.12 XMODEM46.ASM 39K remote CP/M file transfer program 
48.13 SQ ~COM 14K pack ASCII file 
48.14 USQ ~COM 10K unpack ASCII file 


Copyright (C) 1981 by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ 08830-0097 


O>TYPE ACKLIST.O48 


CARRY12.ASM written by Keith Petersen 


SENDOUT3.ASM written by Al Jewer 


UNSPOOL.ASM/UNSPOOL.DOC written by Gary P. Novosielski 


USRDFLT2.CCP written by R. L. Plouffe 


USRPW34.ASM written by Dave Hardy 


XMODEM46.ASM written by Keith Petersen 


Q> 


- : ~ Bid * ee 
UNSPOOL.ASM 81-11-12 
for CP/M 2.0 and up. 


AUTHOR: Gary P. Novosielski 
INTRODUCTION: 


o UNSPOOL (Ver 2.3) is a program to send a standard 
CP/M file such as a .PRN or .ASM file to the system's list 
or punch device, while still allowing other system operations 
to take place. The file is transferred during periods when 
console is waiting for input. 


SYNTAX: 


UNSPOOL [d:]filename.ext [dev] 
[square brackets denote optional parameters] 


Where d: is an optional drive spec 
such as A: or B:. If not 
entered, the current default 
drive is assumed. 


filename.ext is the name of the CP.M file 
to be printed/punched 


dev is the symbolic name of the 
output device to be used. 
Valid devices are LST and 
PUN. Note that the colon (:) 
usually present in these names 


re] is NOT entered. If not 
specified, the LST: device is 
assumed. 


Examples: 
UNSPOOL TEST.PRN 
will send the file TEST.PRN from the current 
default drive to the current LST: device. 


UNSPOOL A:TEST.PRN LST 
is exactly equivalent to the above, assuming 
drive A is the default drive. Note that the device name has no 
trailing colon. 


UNSPOOL B:ZINGER.HEX PUN 
will send the file ZINGER.HEX from the B drive 
to the current PUN: device regardless of which drive is 
currently the default. Note that the device is "PUN" 
not "PUN:". 


OPERATION: 


Upon loading, the program checks to see that the 
the BIOS vector table pointed to by the word at location 
0001H is valid, i.e. is a table of JMP instructions containing 
at least’ 16 entries. If an error is detected, the program 
will display an error message on the console and attempt to 

+ rm-boot CP/M. 

If found, the BIOS vector table is copied into the 
Program segment which will remain active during unspooling 
80 that subsequent application programs running concurrently 
with UNSPOOL will still have access to the BIOS. 

The address of the old BIOS vector table, the BDOS 
entry address, and the CCP return address (from the top of the 
Btach antry)] sre saved in memory. 


The "dev" parameter from the command line is checked. 
If not valid, an error message is typed and control returns 
to the CCP. 

The file named in the command line is opened for 
input. If not present, the filename is echoed to the console 
followed by a "?" and control returns to CCP. 

If the drive is not explicit, the current default 

rive number is recorded internally in case the default drive 
is changed while UNSPOOL is active. 

The current user number and IOBYTE values are checked 
and stored internally so that if the user number is changed, 
UNSPOOL will still be able to read the input file. If the 
device is changed (using STAT LST:=TTY: for example) unspool 
will continue to use the physical device in effect at the 
time the program was initiated. Any application programs 
will, however, use the new values of the user number and the 
new physical device assignments. 

If no errors were detected, the active program segment 
which monitors all calls to BDOS is relocated into high memory 
just below the CCP. This reduces the available user program 
area by 2.75 K: 8 pages for the UNSPOOL supervisor segment, 
and 8 pages for the CCP which is commonly overwritten by user 
program buffers. The BOOT and BDOS jumps in low memory are 
modified to protect the CCP and UNSPOOL supervisor segment. 

Control is then returned to the console. Normal 
CP/M operation will then be possible. Characters will be 
sent from the input file to the output device whenever the 
console is idle. 


Whenever an application program or the CCP requests 
console input using BDOS functions 1 or 10, the supervisor 
Segment intercepts these requests and checks to see if the 

onsole is idle. If it is, characters are transferred from 

he input file to the output device until the console becomes 
ready, i.e. a key if actually pressed. At that time the 

BDOS function is executed normally, and control returns to the 
application program. 

If a jump to BOOT is attempted, this is also 
intercepted by the UNSPOOL supervisor segment. The message 
"Unspooling in progress" is displayed on the console, and 
no actual boot takes place. Control is returned to the 
protected copy of the CCP instead. Before returning, a disk 
reset is performed and the default DMA address is reset to 
OO80H to simulate a true warm-boot as closely as possible. 

When the input file is completely transferred, or 
a 1AH end-of-file character is detected, the supervisor 
becomes inactive, and passes on all BDOS requests immediately, 
without checking console status. When the next warm—-boot 
request is detected, the supervisor removes itself from memory 
by executing a true warm—-boot, and informs the operator with 
the message "UNSPOOL completed.", 


NOTES: 


While UNSPOOL makes every effort to restore the values 
of the DMA address, USER number, IOBYTE, and default disk drive 
before returning control to the Program, a hardware reset may 
leave these values in an undetermined state if unspooling was 

Qetualty taking place at the time. 

The supervisor will not intercept a call to BDOS 
function 0. This will cause a true warm boot to occurr, 
terminating unspool!l immediately. Normally application programs 
Should reboot by Jumping to location OOOOH, not by calling 
BDOS function O. 

Lo When function 10, Read Console Buffer is used, UNSPOOL 
will transfer characters ont: until the °°: oe eo «voesod . 


ic 8 ‘at time, no characters will be transferred until the 
Input line is completed by pressing a carriage return. 

UNSPOOL requires that the List Status function in 
the BIOS was Properly implemented at system installation time. 
UNSPCOL will not send characters to the LST: device unless it 
recieves a ready condition from the List Status routine. If 
the PUN: device is used, no status check is provided for by 
PP/M, so a not-ready condition on the punch may cause the 
System to hang up if PUN was specified on the command line. 
See the CP/M Alteration Guide for a discussion of the BIOS 
List Status routine. 

Although the console is polled frequently during the 
unspooling of the file, some of the diskette operations may 
take a second or two to complete, for example when a new extent 
is opened. Since the console is not polled during this period, 
high speed typing may cause one or more characters to be lost. 
This effect will vary depending upon the program being run, 
the types of input reqests (character or line) it uses, and 
the relative locations on diskette of the spool file and any 
files in use by the program. As a result, heads-down typing 
is not reccommended while UNSPOOL is running. Some experience 
with UNSPOOL will teach the user when caution is required. — 


INSTALLATION: 


The source file is written for assembly with the 
MAC assembler. The .HEX file produced is LOADed to a .COM 
file and executed just as any normal program. Relocation is 
done at execution time as described above. 

If the assembly option EXPAND is set to TRUE, tab 
characters in the input file will be expanded to spaces with 
assumed tab stops at every eighth print position. This option 

hould be set to FALSE if the printer driver or the printer 
tself can properly handle the tab character. If the option 
PHYSBS is set to TRUE, a backspace character will cause the 
tab expansion algorithm to recognize backspace characters 
and decrement the column count when a backspace is encountered 
in the input file. This option should be set to FALSE if 
backspace characters are ignored by the printer. All other 
contro! codes except carriage return are assumed to be non- 
printing, and are ignored by the algorithm. 

If tab expansion is included, the version number 
in the signon message will be followed by "/T". 


Gary Novosielski 


Q> 


TYPE O:SINGSSM.DOC 
SING SSM SERIAL INTERFACE 


A> 


f 

;the Apple serial card apparently has the same protocol for DAT. 
;and STATUS as the communication card. 

3N.B.-->I have not tested this program for the SSM or 

Apple serial interface, but according to documentation I have 
sbeen able to obtain, they should work using these equates. 


‘ 
INITC1 EQU 
INITC2 EQU 
‘ 
IF 
MODCTLP EQU 
MODDATP EQU 
ENDIF 
; 
IF 
MODCTLP EQU 
MODDATP EQU 
ENDIF 


IF 


03 
17 


ccs 
OEOAOH 
OEOAIH 


COMCARD 
OEOAEH 
OEOAFH 


MMIT 


71ST INIT CHAR TO CTL PORT 
;2ND INIT CHAR TO CTL PORT 


3;CCS CARD 

;STATUS PORT OF CCS ACIA 

;DATA PORT OF CCS ACIA (MOT 6850) 
:CCS 


;APPLE COMMUNCATIONS CARD 
; STATUS 

;DATA 

7 COMCARD 


;DC HAYES MI 


oe SIGMUG vol. 49 8/13/85 
_ -SMCAT 049 3K 


ABSTRACT049 1K 
ADDADR ASM 1K 
ARCOMMONDCL 1K 
ARCUSTM DCL 2K 
ARLINK SUB 1K 
*) ARM000 ASM 2K ie, = 
ARMO10 ASM 2K SuBsl SUB 1k 
ARMOl11 ASM 3K A 
62 file(s). 4 
ARM020 ASM 2K 1 directory entries remaining. 
ARMO30 ASM 2K ADSTAT O: 
ARMO40 ASM . 2K 
ARMO50 ASM 2K tna » 51k 
ARM060 ASM 2K fyhae Remasndag On oS* 
ARMO70 ASM 2K aac 
ARP000 PLI 3K 
ARP000 SUB 1K 
ARP010 PLI 12K 
' ARPO10 SUB 1K 
ARP020 PLI 6K 
ARP020 SUB 1K 
ARP030 PLI 6K 
2m 
oP More.. 
ae ARP030 SUB 1K 
a ARP040 PLI 8K 
ARP040 SUB 1K 
ARP050 PLI 5K 
ARP050 SUB 1K 
ARP060 PLI 5K 
ARP060 SUB 1K 
ARPO70 PLI 6K 
+) ARP070 SUB 1K 
CHAIN ASM 6K 
CRCK COM 2K 
GETD92 PLI 2K 
MDBSAMS PLI 1K 
MDBSCALLSUB 1K 
MDBSCL ASM 4K 
MDBSCLO1ASM 3K 
MDBSCLO2ASM 4K 
MDBSCLO3ASM 3K 
> MDBSCRS PLI 1K 
< MDBSDRM PLI 1K 
Q MDBSER ASM 6K 
E - MDBSER PLI 5K 
QO (3) 
5 More.. 
B MDBSFFM PLI 1K 
Me MDBSFMSKPLI 1K 
MDBSFNM PLI 1K 
MDBSGETMPLI 1K 
MDBSPLIIASM 5K 
MDBSPLIISUB 1K 
MDBSPUTMPLI 1K 
MDBSRMS PLI 1K 
MDBSSOM PLI 1K 
MODEM ASM 12K 
oO OUTTEL PLI 1K 
OUTZIP PLI 1K 
PLIAUX SUB 1K 
aiaaians PUTERR PLI 1K 
SCRNMAC LIB 3K 
SCRRTN ASM 29K 


eT.’ TTR a: 


type o:abstract.049 


Again from Robert White, a new (and on-going PL/I) project 
for Accounts Payable/Receivable that emulates the Osborne package 
only a better (bug free?) job of it! Also PRLOADER; to make DDT 
or XSUB-like commands that load into high memory. The Master Data 


Base stuff requires callable subroutines and needs BT-80. 


As a final note, Robert says that more is forthcoming 
complete the package. You may want to call him and wait for 
whole (complete) package. Robert White (in case you lost 
number and/or address may be contacted at: 


H & W Computer Systems, Inc. 
P.O. Box 4173 

Boise, ID 83704 

Phone: (208) 377-0336 


Or, 


Robert M. White 
3986 Bryson Way 
Boise, ID 83704 
Phone: (208) 377-3362 


A> 


to 
the 
his 


- GIGMUG vol. 52 10/8/85 


-SMCAT 052 1K 
ABSTRACT052 5K 

CAT COM 1K 

a CAT DAT 1K 
CATALISTBAS 8K 
CATALISTCOM 22K 

re) CRCK COM 2K 
FMAP COM 2K 

MAST CAT 72K 

SCAT 69K 

SCATPAD BAS 2K 

SCATPAD COM 15K 

SIG/M LIB 2K 
TestProtBAS 1K 

UCAT. COM 2K 

UN COM 5K 


16 file(s). 
39 directory entries remaining. 
COSTAT O: 


Bytes Remaining On O: 31k 


So O>pypE -SMCAT.052 
>S Sig/M Volume 52 Sig/M-CPMUG Cross Reference 
Of un'P'rotect MBasic Programs 
-CATALOG.052 contents of Sig/M volume 52 
ABSTRACT. 052 Sig/M volume 52 documentation 
index name size ere description 
52.01 CAT - COM 1K 26 32 catalog system 
°o 52.02 FMAP ~COM 2K 8C OF 
52.03 UCAT - COM 2K 50 37 / 
52.04 CATALIST.BAS 8K 98 84 cross reference system 
52.05 CATALIST.COM 22K 35 54 / 
52.06 SCATPAD .BAS 2K 4B EB / 
52.07 SCATPAD .COM 15K D2 6A / : 
52.08 SCAT . 69K 9C 35 Sig/M-CPMUG reference data 
52.09 MAST ~CAT 72K 8C CB / 
" 52.10 TestProt.BAS 1K ED 76 sample 'P'rotected file 
Eo 52.11 UN «COM 5K 6B 74 un'P'rotect MBasic program 
a '* this cross reference listing along with Sig/M volumes 29, and 30 
8 i are contained in Book 2 of "The Catalog of Public Domain Software" 
5 Q published by the New York Amateur Computer Club Inc. 
a 
aE Copyright (c) 1982 by Sig/M-Amateur Computer Group 
Fe 


{ 
{ 


E) 


oO 


of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


TYPE ABSTRACT. 052 


Documentation for CATALIST.BAS, SCATPAD.BAS and UN.COM 


CATALIST.BAS - Is used to produce a listing of the contents of 


the latest CPMUG and SIG/M volumes. It reads in SCATS, 

which is a modified version of MAST.CAT ( MAST.CAT is 

produced by FMAP.COM and UCAT.COM). The modifications 

were: 

1> Exclusion filenames (those between parentheses) 
were deleted - parentheses too. 

2> Volume filenames were deleted. It's just redundant 
information, since -CATALOG.xxx or -SIGMLOG.xxx 
are assumed to exist (or there would be no files 
of the form 'filename.ext, ????LOG.xxx'. 

3> A working copy was made using PIP.COM using the [z] 
option, since some programs were inadvertantly 
distributed with CP/M file attributes which set 
some bits in the filenames that prevent them from 
being properly sorted. 

4> It was then sorted in ascending Sequence on all 
fields in the following order: 1, 2, 4, 3. 


If CATALIST.BAS/COM is run, the listing file will be 
saved on disk and may be printed when convenient. If 
you want a listing in your own SCATalogical order, it 
will be necessary to sort SCAT. Since a good number of 
those wishing to do so will have a sort program which 
handles only fixed length records, a request was made 
that a simple program be included which will modify 
SCAT for use by those sort programs. This program is 
known aS... 


SCATPAD.BAS - A quick and dirty program (minimal error checks) 


which will modify a file in one of two ways. 


1> Make all records fixed length by padding spaces 
onto the end of each line. (This extends the size 
of the last field only). 

2> Make all fields fixed length by padding them with 
spaces. Note that while the input file seperated 
the fields with commas, the output will not have 
any if you so specify. Just make sure that they are 
inserted before using CATALIST. If field lengths 
are stated to be larger the the max. possible, then 
the files could look as follows: 


SCAT OUTPUT 

/ ,DOC, CATALOG, 040 1 7 DOC CATALOG 040 

15/PUZ,ASC,CATALOG,013_ | 15/PUZ ASC CATALOG 013 

1500,ASC,CATALOG, 013 | 1500 ASC CATALOG 013 
| 


1CHECK ,BAS, CATALOG, 054 1CHECK BAS CATALOG 054 
If the field lengths are stated as being the true 
maximum, then the result will look like this: 


SCAT OUTPUT 


21,ASC,CATALOG, 005 

21BI0S,ASM,SIGMLOG, 017 
21BI0S,ASM,CATALOG, 069 
21BI0S,DOC,SIGMLOG, 017 


| 21 ASCCATALOG005 
! 21BIOS ASMSIGMLOGO17 
I 21BI0S ASMCATALOG069 
I 21BI0S DOCSIGMLOGO17 
If commas were specified with field lengths of 

g 3 7 and 3 bvtes, the reeu + will apnnvear as: 


UN.COM 


21BI0S,DOC,SIGMLOG, 017 
21BIOS,DOC,CATALOG, 069 
21BOOT,ASM,SIGMLOG, 017 
21BOOT,ASM,CATALOG, 069 


21BIOS ,DOC,SIGMLOG, 017 
21BIOS ,DOC,CATALOG, 069 
21BO00T ,ASM,SIGMLOG,017 
21BOOT ,ASM,CATALOG, 069 


If you would like to know where to obtain information 
on how to use Ward Christenson's catalog programs, just 


use them like so... 
Type 'CAT CAT??.*' or 'CAT FMAP??.*' and watch the tube. 


- An updated version of the one submitted to the CPMUG 
several months ago. Use it to recover your Basic~80 
programs which were saved with the 'P'rotect option. 
It is self documenting if you can figure out how, and 
running it can be a real 'Adventure'. This version 
works with all version 5.xx MBASICS up to 5.21, but 
unfortunately, not with Heath's CP/M. 


*kEKK Notes ***eK 


O> 


CATALIST was timed using 8" drives, double 
density, single sided. The source file, SCAT 
was kept in drive A:, and the output file was 
always written to a empty disk in drive B:. The 
interpreter took 12 minutes to finish, while the 
compiled program made it in 2:50. However... 
the demo program supplied for UN.COM (TestProt.BAS) 
runs much slower when compiled. 

This will be a do-it-yourself disk for all of 
you that want the listing that CATALIST.BAS 
produces. In a previous life, this disk was known 
as SIGM Volume 12. Unlike #12, this disk has no 
room for the listing, but by the time you read this 
it should be available as part of the NYACC Catalog 
of Public Domain Software (Book #2). 


bye, - ben. - 12/13/81 


SIGMUG vol. 55 10/8/85 


-SMCAT 055 2K 
CRCK COM 2K 
SIG/M LIB 2K 
SIGMLOG 031 20K 
SIGMLOG 032 1K 
SIGMLOG 033 1K 
SIGMLOG 034 1K 
SIGMLOG 035 1K 
SIGMLOG 036 1K 
SIGMLOG 037 1K 
SIGMLOG 038 1K 
SIGMLOG 039 15K 
SIGMLOG 040 11K 
SIGMLOG 041 9K 
SIGMLOG 042 13K 
SIGMLOG 043 24K 
SIGMLOG 044 39K 
SIGMLOG 045 23K 
SIGMLOG 046 1K 
SIGMLOG 047 1K 
SIGMLOG 048 24K 
SIGMLOG 049 4K 
More.. 

SIGMLOG 050 5K 
SIGMLOG 051 1K 
SIGMLOG 052 6K 
SIGMLOG 053 12K 


26 file(s). 

32 directory entries remaining. 
C>OSTAT O: 

Bytes Remaining On O: 20k 


C> 


303 


. CA 99 


TORRANC 


| K&M Company 


j 
; 
H 
1 


Bh 


oO 


TYPE -SMCAT.055 


Sig/M. Volume 55 documentation addendum #3 of SIG/M 
catalog of public domain software volumes 


(supplement to Sig/M volumes 15, 29, and 30) 
This volume contains the various *.DOC, ABSTRACT.*, READ.ME, etc 
files as contained in the SIG/M volumes. This was compiled and 
published to facilitate ready reference of public domain software 
for the micro-hobbiests. 


SIGMLOG.nnn refers to a SIG/M release volume nnn 


index name size cre description 

55.01 SIGMLOG .031 20K 5D 01 Sig/M catalog documentation 
55.02 SIGMLOG .032 1K 2F OA ; / 
55.03 SIGMLOG .033 1K 4B 2E / 
55.04 SIGMLOG .034 1K 1C F2 / 
55.05 SIGMLOG .035 1K A7 3B / 
55.06 SIGMLOG .036 1K 9B DA / 
55.07 SIGMLOG .037 1K 8D 9F / 
55.08 SIGMLOG .038 1K 19 DD / 
55.09 SIGMLOG .039 15K 06 48 / 

55.10 SIGMLOG .040 11K 75 2C / 

55.11 SIGMLOG .041 9K AF C2 / 

55.12 SIGMLOG .042 13K CE 13 : / 

55.13 SIGMLOG .043 _ 24K 32 2E / 

55.14 SIGMLOG .044 39K 6C BF / 

55.15 SIGMLOG .045 23K 29 QE / 

55.16 SIGMLOG .046 1K 1E C9 / 

55.17 SIGMLOG .047 1K - A7 FO / 

55.18 SIGMLOG .048 24K DB 5A / 

55.19 SIGMLOG .049 4K 42 47 7 

55.20 SIGMLOG .050 5K 3E B3 / 

55.21 SIGMLOG .051 1K FA FE / 

55.22 SIGMLOG .052 6K D9 55 / 

55.23 SIGMLOG .053 12K 2C 57 / 


Copyright (c) 1982 by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


o> 


ee ee coat Re = aa eS _ 


eS 


POLY-VU 
#PV 449 


K&M Company 
TORRANCE, CA 90503 


fer) 


oO 


~CATALOG060 
CRCK COM 
D-24 ASM 
D-24 COM 
DUPUSR2 ASM 
DUPUSR2 COM 
ENTBBS25ASC 
FLIP4 ASM 
FLIP4 COM 
FLS-11 COM 
MINBBS25ASC 
MLIST50 ASM 
MLIST50 COM 
RBBS22 DOC 
RBBS25 ASC 


RBSUTL22ASC 
SD-41 DOC 
SD-42 ASM 
SD-42 COM 
SIG/M LIB 
SQ-15 COM 
SQ/USQ15DO0C 
More.. 

SQUEEZ ERDOC 
UsQ-15 COM 


24 file(s). 


23K 


SIGMUG vol. 


R/O 


R/O 


R/O 


R/O 


34 directory entries remaining. 


D>STAT O: 


Bytes Remaining On O: 6k 


D> 


ane. te De eee 


60 


2/11/86 


TYPE O:-CATALOG. 060 
Sig/M Volume 60 Miscellaneous CP/M Utilities 


-CATALOG. 060 contents of Sig/M volume 60 
released March 17, 1982 


SIG/M.LIB Sig/M library submittal form 
CRCK.COM computes CRC checksum 
index name size cre description 
60.01 D-24 -ASM 17K E3 33 Restricted Directory List 
60.02 D-24 ~COM 2K 44 70 / 
60.03 DUPUSR2 .ASM 8K CA 07 Duplicate Directory Entry 
60.04 DUPUSR2 .COM 1K 44 75 / 
60.05  FLIP4 -ASM 3K 17 CB Updated Originate/Answerback FLIP 
60.06 FLIP4 «COM 1K FC E8& / 
60.07 MLIST50 .ASM 13K 82 81 Multiple File List Directory 
60.08 MLIST50 .COM 2K 44 BO / 
60.09 ENTBBS25.ASC 8K F4 FC Updated RBBS System 
60.10 MINBBS25.ASC 18K 19 34 / 
60.11 RBBS22 .DOC 6K 00 8D / 
60.12 RBBS25 .ASC 23K C1 52 / 
60.13 RBSUTL22.ASC 9K DB 66 / 
60.14 sp-41 «DOC 12K D1 AB Updated Super Directory 
60.15 SD-42 ~ASM 47K FA 01 / 
60.16 SD-42 «COM 2K 13 5D / 
60.17 FLS-11 .COM 9K 0c 99 Updated SQueeze and UnSQueeze 
60.18 SQ-15 ~ COM 14K 1E 8B / 
60.19 SQ/USQ15.DOC 1K C5 B7 / 
60.20 SQUEEZER.DOC 23K AO 4D / 
60.21 USQ-15 .COM 10K 56 1F / 


Copyright (c) 1982 by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


D> 


to. 3 KRSLSLZ4.D0C 

This is a preliminary documentation file for the 2.0 
version of RBBS (Remote Bulletin Board System). More com- 
plete documentation, to include a complete overview as well 
as more detailed implementation notes, is planned. 
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RBBS PROGRAM 


The RBBS software has four new features with the 2.0 
implementation: 


1) 


2) 


3) 


Personal messages: A caller can leave a personal 
message to anyone else by entering the password 
"x" “This causes the message to be invisible in 
summary commands, and retrieve and kill, for any- 
one but the sender and receiver. An attempt to 
Kill a personal message by anyone other than the 
sender or receiver (and, of course, the SYSOP), 
will result in a "message not found". 


Re-entry: when a user has exited to the operating 
system, RBBS will retain his name in a file called 
"LASTCALR". If RBBS is subsequently re-entered 
with RBBS P (the "P" was arbitrarily chosen), the 
system will retrieve his name from the "LASTCALR" 
file, and skip the sign-on printing. Note that if 
you are using a loader'‘program to load RBBS from 
another user area (under cp/m 2.x), you can make 
this function automatic, by having the loader fill 
in the "P" immediately before it transfers control 
to RBBS. In this case, your BYE program should 
store a non-"P" character at location 5DH (default 
cp/m file control block). 


Killed messages will now have additional information 
in the record used to store the message number: 
0:<#>:<user name> 
where 0 indicates a killed message to RBBS, <#> is 
the original message number, and <user name> is the 
name of the user who killed the message. This should 
be helpful in restoring messages improperly killed 
by inept/malicious individuals. Note that after 
using an editor to restore the message (be careful 
here - the editor must not choke on blank-filled 
lines), the "BUILDSUM" function of the RBBSUTIL pro- 
gram can be used to generate a new summary file. 


4) Message passwords, previously only stored in the sum- 
mary file, are now duplicated in the message file. 
This was necessary to allow the BUILDSUM function of 
RBBSUTIL to generate a complete summary file. 


RBBS UTILITY PROGRAM (RBBSUTIL) 


The utility program has the following changes with the 


1) 


2.0 upgrade: 


When transferring a disk file to the message file, 
the files must have already been purged. This in- 
sures that the files will have been backed up prior 
to any messages being added. Note also that the 
file "COUNTERS" will also be backed up by purge. 


ab | 


2) The purge function writes deleted messages to an ar- 
chive file called <DATE>.ARC, where the date is sup- 
plied by the operator when purge is invoked. The 
archive file is written sequentially, and lines are 
unpacked before writing to conserve space. 


3) The purge function allows renumbering of the messages 
starting at any number specified when purge is in- 
voked. You may choose not to use this option if you 
maintain archives, because duplicate message numbers 
can be left in the archive files. 


4) A new function, "B", will build a summary file from 
the message file. This can be useful after editing 
the message file. It also allows only the message 
file to be saved when doing back-up operations, as 
the summary file can now be derived from the message 
file. Note that releases of RBBS previous to 2.0 did 
not save the passwords in the message file, there- 
fore, a summary file, rebuilt from such a message 
file will not have password protection. 


Ron Fowler 
Nov 18, 1980 
Westland, Mich. 


PREVIOUS DOCUMENTATION OF THE RBBS SYSTEM 


RBBS.DOC as of 10/23/80 


RBBS is short for "Remote Bulletin Board System". 

RBBS.ASC is a file that was created with MBASIC 5.2. Do 
not try to edit it with a CP/M text editor because some of 
the multiple line statements may have special end-of-line 
sequences which may mess up a video-oriented editor, making it 
impossible to see some of the lines. Use MBASIC 5.2 to edit the 
file. This is public-domain software, feel free to use it on 
your own system. The best way to run this program is to com- 
pile it with the MBASIC compiler, making a COM file out of it. 
It will run much faster that way. This is what Bruce Ratoff 
did, and it works great on his system. 

The POKES to address 0000h change the C3 to a CD during 
execution of this program. Bruce Ratoff tests for this in 
his DCHBYE55 remote console program. This testing is also done 
in the PMMIBY63 remote console program. In the input from modem 
port routine a test is made to see if address 0000h is a CD, if 
so it causes the input routine to ignore control-C, changing it 
to to a null character instead. This makes it impossible for 
the user to control-C out of RBBS. When the program is done, 
if you are exiting to CP/M for file transfers, it changes the CD 
back to a C3 and then jumps to 0000h (warm boot). 

RBBSPURG.ASC is a program for purging dead messages out of 
the RBBS message files. This should be done periodically to 
compactthe message files, since the "Kill" function simply 
deletes the pointer to the message, not the message itself. 


NOTE: The above RBBSPURG.ASC has been superceded by 
RBBSUTIL.ASC rgf 


ee ae ee ee 


»PE O:SD-41.D0C 


The SD Directory Program 


°o 


This documentation file concerns SD-NEW.ASM and SD-NEW.OBJ, 
version 4.1 as of October 20, 1981. Version 4.1 is a 
Significant upgrade of the standard "super-directory" program 
that most RCP/M systems are now using as their "DIR" executor. 
SD-41 implements many new features over version 3, and has been 
tested on a wide variety of CP/M systems prior to release. 
However, due to the large number of equates in the source file, 
all possible permutations have NOT been tested, and it should be 
understood that revision 4.1 is experimental in nature, and 
should not be placed on-line in remote applications until 
sufficient time has elapsed to allow for initial bug reports 
from the field. 


The most significant difference between version 4.1 and 
version 3.X concerns the ability of SD to search a range of 
drives and/or user areas for a specified file. This capability 
is patterned after FILEFIND, but is significantly more useful in 
that SD will report the sizes of files matched. A new  BDOS 
intercept routine has been added, which although more involved 
than the FILEFIND method, iS more generally applicable and 
should run "as-is" on most CP/M systems. Thus, by using SD-41, 
the use of a separate FILEFIND program should be unnecessary. 


° The basic operation of SD is as in previous releases. You 
merely type "SD", followed by an optional ambiguous or 
unambiguous filename (as you would with the CCP directory 
command). Omitting the filename (i.e., "SD [CRI"), will be 
interpreted as "SD *.*". Similarly, "SD A:" would imply "SD 
A:*.*" and "SD B:" would imply "SD B:*.*". In addition to the 
filename option, up to 8 command line options may be specified. 
If options are to be specified, then the filename must be 
EXPLICITLY specified by at least a drive code. Option fields 
are preceded by a single dollar sign as with most Digital 
Research programs such as MAC, and may be essentially free-form 
in format. Example: SD A: $s a D rnu0 fp. Note that the 
reference to the A drives in "A:" is mandatory. Invoking SD 
with a command of the form "SD $s a D rn u0 fp" would result in 
SD thinking that $S was the file to be searched for. Note also 
that spaces and case within the option field are insignificant 
(i.e., "S$ SADrNu0F p" is equivalent to "$ S ADRNUOF PP"). 
The only exception concerns the "USER" option which will be 
explained later. Users should also be aware of two restrictions 
on the command line format. SD scans the entire command line 
for a dollar sign preceded by at least 1 blank to delimit the 
beginning of the option field. For this reason, invoking SD 
with a command line such as "SD $ $AR" is illegal since SD will 
consider the first dollar sign to be the option field delimiter. 
If you need to specify a a filename whose first character is a 
Q@iollar sign, precede it with a drive code as in "SD A:$ $AR". 

In this instance, SD will consider the first dollar sign 
insignificant as it is not preceded by a blank. 


SD-41 Documentation Notes 


The second restriction is that command line options may be 
Qsvecifiea once and only once per invocation. That is, "SD A: 
$SDS" would be illegal since the "S" option is specified twice. 
This shortcoming is due to the fact that options can be made 
into defaults at assembly time. 


The eight options recognized are: 


"S" - system option : system files will be included in 
the output rather than being suppressed. 


"PF" - file option : the directory output will be 
echoed to a disk file named "SD.DIR" on the 
DEFAULT drive. If SD.DIR already exists, then 
the directory output will be APPENDED to the end 
of the file. Otherwise, SD.DIR will be created 
as a new file. The append feature allows you to 
build up one massive file on the default drive 
containing the directories of all of your disks, 
without having to concantenate a swarm of 
individual directory files. If you plan to use 
this feature often, it willbe simpler for you to 
have a dedicated version on your MASTCAT disk 
with RESFLG set TRUE. The advantage of this is 
that you can work through a pile of disks 
without having to CTRL-C or specify the "R" 
option everytime you SD a new disk. Failing to 

« do this will result in the allocation vector 
being invalid, and FREE size will be wrong. 


"U" - user option : allows the specification of the 
user number for the directory of the form "Uxx" 
where the user # is greater than 0, but not 
greater than a specified value not to exceed 15. 
The user option specification will be illegal if 
the user # is out of range, omitted, or if U is 
specified on a pre-CP/M 2 system. Note that 
since the user option requires a parameter 
(i.e., the user number), the user number must 
immediately follow the "U" option on the command 
field. That is, "Ul" is legal, but "U 1" is 
not. In this respect, the U option differs from 
the other options in that embedded spaces ARE 
significant. 


"A" - all users : causes SD to display directories of 
all user areas starting at the user area 
specified in the U option or, if U option is 
omitted, the default user area and continuing up 
to MAXUSR. 


"R" - reset option : allows for automatic resetting of 

re] the disk prior to performing directory search so 
that the allocation vector will be updated. 

Same aS doing a CTRL-C when changing disks, but 

handy if you didn't (such as when running a 


2 
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SUBMIT file). Note that the RESFLG equate will 
+) force the R option unconditionally each time SD 
is run. Useful for SDing a stack of disks with 
the "F" option, but slows down SD considerably 
in normal use. 


"N" - no page option : unconditionally disables the 
page pause option. Useful when running SD in 
the "F" and/or "A" modes when you don't want the 
page prompt slowing you down. Note that SD-41 
will not put the page-pause prompt into the 
output file. 


"p" — printer option : forces all console output to be 
echoed to the CP/M list device, with the most 
significant bit set to 0. 


"D" - all disk option : allows SD to search all disk 
drives on-line starting with the disk drive 
specified or implied with the command line 
filename. For example, "SD B: $D" will result 
in SD searching all drives beginning with drive 
B. "SD *.* $D" will result in SD searching all 
drives beginning with the drive that is logged 
in. 


o. If an unrecognized option (or illegal user option 
pecification) is detected, then the command line will be played 
back to the console up to the point where the error was 
detected. However, if the REPERR option is disabled, then SD 
will keep its mouth shut and ignore everything on the command 
line past the illegal field. In this situation, an illegally 
specified user number would default back to the current user 
number. The option of DISABLING error reporting was included 
primarily for systems with hidden doors and secret passageways. 
Shooting off rockets and clanging bells everytime a holswap 
starts "experimenting" just calls attention to the fact that 
there really IS something behind that hollow- sounding wall 
after all (if you get my drift). 


As an added convenience, it is possible to "hard-wire" some 
or all of the command line options. For example, if you want SD 
to ALWAYS perform a reset of the disk system before putting its 
show on the road, you can do just that. For details, see the 
comments preceding the option field lookup table in the 
assembler source file. 


Finally, if the all-disk and/or all-user options are 
enabled, it may be desirable to restrict searches. To 
facilitate this, a table is included in SD (beginning at label 
"LODRV" and continuing through "HIDRV"). The table consists of 
a single byte for each drive to be searched beginning with A. 
@ach byte may be in the range of 0-15 mod 15 and defines the 
highest user number that SD will search for that particular 
drive. The highest drive number to search is defined by the 
length of the table. If four DBs are present between LODRV and 
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HIDRV, then drives A-D can be searched. The source file 
includes the LODRV-HIDRV table in its maximum configuration for 
16 drives. However, it is recommended that you delete DBs 
referencing drives that aren't available on your system. 
Although SD will intercept attempts to search non-existant 
drives, there really isn't any point in allowing SD to always 
search drive C when you only have 2 logical drives; and 
depending on how your BIOS is constructed and how long it 
monkeys around before advising the BDOS of the select error, it 
could save some time. 


A THOUGHT FROM "THE LAST REVISOR" 


If you sit down and figure out the number of permutations 
of options and equates in the latest versions of SD, you'll 
understand why there aren't any warranties as to the absence of 
entomological cybernoids. I leave it to the CP/M community to 
smoke out what bugs may pop-up when a certain combination of 
variables occurs. If you find any bugs, please leave an 
advisory or a fix on either TCBBS or the Hyde Park RCP/M so that 
they can be exterminated. 


Finally, my latest revisions expanded the size of the load 
module considerably, and it is now weighing in at just under 2K 
if all of the options are enabled. A program of this type has a 

tendency to be widely propogated throughout a disk library, and 
Qeince 2K is the block size of most double and quad-density 
systems, I feel that it is important to try and keep SD under 2K 
if at all possible. That's why some of my code may be cryptic 
in some places - I've sacrified clarity for code reductions. If 
you plan to make public-domain enhancements to SD which would 
push it over the 2K mark, ask yourself whether its worth tying 
up an additional disk block. This is also an invitation for 
someone less lazy than myself to further optimize the code to 
reduce SD to as compact a package as possible (thus making room 
for more enhancements). For my part, I quit when I got it under 
2K. It works, it fits and I'm ready to move onto something 
else. 


I pass the torch. 


David Boruff 
Knoxville, Tennessee 


SD-41 Documentation Notes 


From: Ben Bronson 
To: All 


Re: New SQ USQ@ and FLS 


Greenlaw's latest SQUEEZER programs are FLS-11, USQ-15 

and SQ-15. The main change is to SQ, which turned out 

to have a bug in it--in previous versions, an occasional 
Combination of characters would cause it to try to generate 
code longer than 16 bits, which made the files involved 
non-unsqueezable. Steve Bogolub here in Chicago discovered 
the bug, sent files that proved its existence to Richard 
Greenlaw, and got a disk with a debugged SQ last week. It 
now checks to see whether a >16 bit code is being generated 
and if so prints "rescaling" and goes around again to gene- 
rate a safer table. 


--> FILE: FLS-11 .COM crc = oc 99 

--> FILE: SQ-15 .COM CRC = 95 BO 

--> FILE: US@-15 .COM CRC = FE 42 

D>TYPE O:SQUEEZER.DOC 

USAGE AND RECOMPILATION DOCUMENTATION FOR: 7/18/81 


SQ.COM 1.3 File squeezer 
uSQ.COM 1.4 File unsqueezer 
FLS.COM 1.1 Ambiguous file name expander 


DISTRIBUTION RIGHTS: 

I allow unrestricted non-profit distribution of this 
software and invite users groups to spread it around. 
However, any distribution for profit requires my permission 
in advance. This applies only to the above listed programs 
and their program source and documentation files. I do sell 
other software. 


PURPOSE: 
The file squeezer, SQ, compresses files into a more compact 
form. This provides: 
1. Faster transmission by modem. 
2. Fewer diskettes to distribute a program package. 
{Include USQ.COM and instructions, both unsqueezed. 
3. Fewer diskettes for archival storage. 


Any file can be squeezed, but program source files and text 
files benefit the most, typically shrinking by 35%. Files 
containing only a limited character set, such as dictionary 
files, may shrink as much as 48%. Squeezed files look like 
gibbersh and must be unsqueezed before they can be used. 


The unsqueezer, USQ, expands squeezed files into exact 
duplicates of the original or provides a quick, unsqueezed 
display of the tops of lor all of) squeezed files. 
Unsqueezing requires only a single pass. 


Both SQ and USQ@ accept batches of work specified by lists of 
file names (with drives if needed) and miscellaneous 
options. They accept these parameters in any of three ways: 


4. On the CP/M command line. 
2, From the console keyboard, 
3. From a file. 


The FLS program can be used [on the same command line!) to 


ft 
sk 


expant parameter lists containing wild-card lambiguous) file 
names into lists with the specific file names required by SQ@ 
and USQ, 


This combination of Programs allows you to issue ae single 
command which will produce many squeezed or unsqueezed files 
from and to various diskettes. For example, to unsqueeze all 
Squeezed ASM files on drive B and send the results to drive 
C and also unsqueeze all squeezed TXT files on drive A and 
send the results to drive D: 

A>fls c: b:*.aqm d: *.tqt lusq 
For detailed instructions see USAGE. 
This DOES run under plain old vanilla CP/M! Many of the 
Smarts are buried in the COM files in the form of library 
routines provided with the BDS C package (lavailable from 
Lifeboat). 


The above example simulates a "pipe" (indicated by the "I") 
by sending the "console" output of the flS.com program to a 
temporary file and then running the sq.coOm program with 
options which cause it to read its parameters from its 
"console" input, which is really redirected to come from the 
temporary file. 


THEORY: 

The data in the file is treated at the byte level rather 
then the word level, and can contain absolutely anything. 
The compression is in two stages: first repeated byte values 
are compressed and then a Huffman code is dynamically 
generated to match the properties of each particular file. 
This requires two passes over the source data. 


The decoding table is included in the squeezed file, _ so 
squeezing short files can actually lengthen them. Fixed 
decoding tables are not used because English and various 
computer languages vary greatly as to upper and lower’ case 
proportions and use of special characters. Much of the 
savings comes from not assigning codes to unused byte 
values. 


More detailed comments are included in the source files. 


USAGE TUTORIAL: 


As usual, you have to learn how to tell the programs what to 
do (Ci.e., what parameters to type after the program name). 
First I will introduce the various possibilities by example. 
Then I will summarize the rules. 


In the simplest case either SQ or USQ can simply be given 
one or more file names (with or without drive names): 

A>sq xyz.asm 

A>sq thisfile.doc b:thatfile.doc 
willl create squeezed files xyz.aqm, thisfile.dqe and 
thatfile.dqc, all on the current drive, A. The original 
files are not disturbed. Note that the names of the squeezed 
files are generated by rules — you don't specify them. 


Likewise, 

A>usq xXyz.aqm 
will create file xyz.asm on the A drive, overwriting the 
original. (The original name is recreated from information 
stored in the squeezed version.) The squeezed version is not 
disturbed. 


Each file name is processed in order, and you can list all 
the files you can fit in a command. The file names given to 
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the FLS program to expand patterns like *.asm Call files of 
type asm) into a list of specific names and feed them into 
SQ or USQ. 


The above examples let the destination drive default to the 
current logged drive, which was shown in the prompt to be A. 
You can change the destination drive as often as you like in 
the parameter list. For example, 
A>sq x.asm b: y.asm z.asm c: d:s.asm 

will create x.aqm on the current drive, A, y.aqm and z.aqm 
on the B drive and s.aqm on the C drive. Note that the first 
three originals are on drive A and the last one is on drive 
D. Remember that each parameter is processed in order, so 
you must change the destination drive before you specify the 
files to be created on that drive. 


Eventually you will have diskettes with many squeezed files 
on them and you will wonder what is in which file. If they 
weren't squeezed you would use the TYPE command to took at 
the comments at the beginning of the files. But squeezed 
files just make a mess on your CRT screen when you’ TYPE 
them, so I have provided the required feature as a preview 
option to the USQ program. 

A>usq -10 x.bas b:y.asm 
will not take the time to create unsSqueezed files. Instead 
it will unsqueeze the first 10 lines of each file and 
display them on your console. The display from each file 
consists of the file names, the data and a formfeed (FF). 
Also, 

A>usq - c:xyz.mac 
will unsqueeze and display the first 65,535 lines of any 
files listed. That's the biggest number you can give it, and 
is intended to display the whole file. 


This preview option also ensures’ that’ the data is 
displayable. The parity bit is stripped off (some Wordstar 
files use it for format control) and any unusual control 
characters are converted to periods. You'll see some of 
these at the end of the files as the CP/M end of file is 
treated as data and the remainder of the sector is 
displayed. ' 

You are now familiar with all of the operational parameters 


of SQ and USQ. But so far you have always typed them on the 
command line which caused the program to be run. For reasons 


which will become apparent later, I have also provided an 
interactive mode. If there are no parameters (except 
directed i/o parameters, described later) on the command 
line, SQ and USQ will prompt with an asterisk and accept 


parameters from the console keyboard. Each parameter must be 
followed by RETURN and will be processed immediately. An 
empty command (just RETURN) will cause the program to exit 
back to CP/M. Try it - it will help you understand what 
follows. 


Now lets get into directed i/o, which will be new to most of 
you, but will save you so much work you will wonder how you 
ever got along without it. 


Perhaps you frequently squeeze or unsqueeze the same list of 
files and you would like to type the list once and be done 
with it. Use an editor for FLS, described below) to create a 
file with one parameter per line. For example call it 
commands./st. 


» Tei, 
A>sq <commands.Ist 


will cause the command list file to be read as if you were 


typing it! You will see it on 


the console. 


That was redirected console input. Now assume that you have 
avery long list of files to squeeze or unsqueeze and while 
you are taking a nap the progress comments and maybe’ some 


error comments” scroll off 
console output will let 
information ina file so you 
comments will have the screen 


For example, 
A>sq <commands.Ist >out 


the screen. Redirecting’ the 
you capture the progress 
can check it later. The error 
to themselves. 


will send the progress comments to the file "out", which you 
can TYPE later. The routine display of the program name and 
version, etc., will still go to the console. 


A more practical example is to send that information to the 


console and to the file. 
A>sq <commands.Ist +out 
will do that. 


Redirected input and output 
either, both or neither. 


are independent - you can do 


There is one more form of redirection called a "pipe". It is 
by far the most important to you. Recall that I promised to 


tell you how to use ambiguous file names such as *.asm (all 
files of type asm on the current default drive) or *.?q? 
(all files having a "q" as the second letter of their type]. 
That last example just happens to mean "all squeezed files", 


assuming you don't have any other files with such ae silly 


name (I hope). 


I have provided a program called FLS which is’ intended 
primarily for use in pipes. Here is an example: 

A>fls c: x.asm y*.asm >temp.$$$ 

will simply pass the first two parameters through to the 
console output, which is being redirected to a file called 
temp.$$$. But the third parameter will be replaced by all 
the files on the current drive which are of type asm _= and 


have names beginning with y. 


FLS is smart enough to know that a letter followed by a 
colon and nothing else is a destination drive name intended 


for SQ or USQ. It will also 
with a - (minus sign) as an 
Anything else is considered 
checked against the directory 


Therefore you could use: 


treat any parameter beginning 
option to be passed _ through. 
a file name or pattern and is 
of the appropriate drive. 


A>fls b: c:*.aqm *.aqm -10 stuff.dqce >temp.$$$ 


A>usq <temp.$$$ 
A>Dera temp.$$$ 


to unsqueeze all files of type aqm on drives C and A and put 


the unsqueezed files on drive 
10 lines of file stuff.dqce. 


Here is where the pipe comes 
can be abbreviated as: 


B, and then preview the first 


in. The above three commands 


A>fls b: c:*.aqm *.aqm -10 stuff.dqe lusq 


That Jlittle "I" is the pipe 


option and it causes’ the FLS 


outtut to be redirected to a temporar: file and when that is 


oi 4 


sone tt actually runs US@ for you with the proper’ input 
redirection and then erases the temporary file. 


If that isn't enough, you can still use the + or »> 
redirection option at the end of that line to capture the 
console output from USQ. 

A>fls b: c:*.aqm *.aqm -10 stuff.dqe lusq >out 


If you plan your comments carefully you can produce a single 
file containing an abstract of an entire library of squeezed 
files in one step! 

A>fls -25 *.?q? lusq >abstract 


One final point. Anywhere you specify a file name you’ can 
specify a drive in front of it. That applies to redirection 
and well as files to be squeezed and unsqueezed. If a name 
begins with a — (minus sign) it will look ltike an option to 
FLS unless you put a drive name in front of it (b:-sq.077). 


USAGE SUMMARY: 

The previous section gradually presented the various options 
by example. This section gives a condensed and more abstract 
description and is intended for reference. If you couldn't 
see the forest for the trees, maybe this will give you a 
better view. 


The parameter handling of these programs is straightforward. 

Parameters fall into two classes: directed i/o options and 

operational parameters . Note that parameters read from files 
or from the console are not forced to upper case, but’ the 

internal file handling routines all treat lower case _ as 

upper case. 


When a file to be written already exists, it is quietly 
overwritten. 


Directed I/O parameters: 

The first action taken by these programs is to process 
directed i/o parameters from the CP/M command line. These 
parameters are optional and take the forms: 


<file read console input from file 
>file send most console output to file 
+file send most console output to file and console 


Ipgm ... send most console output to a temporary file 
then run PGM.COM and take console input 
from the temporary file. "..." represent the 
parameters for PGM. This is called "piping". 


Only one input and one output redirection can apply to each 
program. After the program has arranged for any directed i/o 
parameters to be obeyed they are deleted from the parameter 
list seen by the rest of the program. 


Operational parameters: 

The program then checks if there are any remaining 
parameters from the CP/M command line. If there are, they 
are obeyed. If and only if there are no remaining parameters 
on the command line, the program prompts for them at the 
console. If console input has been directed to a file one 
parameter is read and obeyed from each line of the file. 
Otherwise, the user follows each typed parameter with a 
RETURN and an empty command exits the program. 


qr 
ik A 


= Cperasvional parameter 18 obeyed without looking ahead 
to other parameters, so options should precede the _ file 
names to which they apply. 


SQ operational parameters are a list of the following types: 
drive: set the current destination drive 
filename file to be squeezed 
drive:filename " n " 


SQ does not change the files being squeezed. New, squeezed 
files are created on the destination drive (defaults to the 
Current drive) with names derived from the original name but 
with the second letter of the file type (extention) changed 
to Q. When there is no type, Q@@Q is used. The original name 
is saved in the squeezed file. 


USQ operational parameters are a list of the following 
types: 
drive: set the current destination drive 
filename file to be squeezed 
drive:filename " af uw " 
—count Preview (display on the console) the first 
"count" lines of each file, where 


"count" is a number from 1 to 65535. 


If the -count option IS NOT in effect then USQ creates 
unsqueezed versions of the listed files on the destination 
drive, which defaults to the current togged drive. Each 
unsqueezed file is CRC checked against the CRC value of the 
original file, which is part of the squeezed file. 


The -count option is for previewing squeezed files. It 
allows you to skim through a group of squeezed files, 
peeking at the first "count" lines in each. The > or + 


output redirection option could be used to capture this 
information ina file, along with the corresponding file 
names, thus forming an abstract of the files on a disk. 


When the -count option is used the CRC check is’ cancelled 
and the output is forced into printable form by stripping 
the parity bit and changing most unprintable characters’ to 
periods. The exceptions are CR, LF, TAB and FF. The output 
from each file is terminated by an FF. PIP can be used to 
strip FFs and provide formatted printing if desired. "Count" 
defaults to the maximum value, 65,535, in case you want to 
look at a whole file. 


FLS operational parameters: FLS is a "filter", which means 
it accepts input from the console input or command line and 
transforms the input according to a set of rules to produce 
console output. That's fine for getting familiar with FLS, 
but to make it useful you "pipe" its output to the input of 
SQ or USQ. 


Any FLS parameter which is of the form: 
drive: 

or -anything 

is copied to console output unchanged. 


Any other FLS operational parameter is treated as a file 
name and is checked against the directory of the appropriate 
drive. If it contains * or ? it is replaced by a list of all 
the files which fit the pattern. If nothing is found in the 
directory an error comment is Sent to the console, even if 
normal console output has been redirected to a file. 
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redirection to get the file list, etc., on which US@ or SQ 
are to operate you must NOT put any parameters other’ than 
redirection following the program name. They must be all 
together in the input parameter list. Example: 


A>fls -10 b:*.cq lusq +saveout 

is the proper way to preview the top (first 10 lines) of 
each squeezed .C file on the B drive. The -10 is passed 
through FLS to USQ. The results will be displayed on the 
console and saved in file "saveout" on the A drive. The 
Saveout file lets you confirm the list of processed files 
even if the display scrolls off the screen while running 
unattended. 


In summary, i/o redirection parameters (those prefixed by +, 
<, >, or 1) always follow the command to which they apply, 
but operational parameters (destination drive, -options) 
must be with the file name list. 


EXAMPLES: 
1. Unsqueeze all squeezed files on the current drive and put 
the resulting unsqueezed files on the same drive. 

A>fls *,?q? lusq 


2. Look at the first 10 lines of every squeezed file on 
drive B. 

A>fls -10 b:*.?Q? lusq 
note that since the file names for USQ came from FLS, the 
count option had to come from there too. 


4. Squeeze all .ASM files on the B and C drives and put the 
squeezed files on the D drive. 

A>fis d: b:*.asm c:*.asm Isq 
Note that if d: had not been first the squeezed files would 
have gone to the A drive. 


5. Squeeze file xyz.c on the A drive and put the results on 
the A drive. 
A>sq xyz.c 


6. Build a parameter ltist of all ASM files on drive C in 
file XX.PAR and view it on the console. 
A>fls c:*.asm +xx.par 


7. Use the above list to squeeze the files to the A drive. 
A>sq <xx.par 


8. As above, but results to the B drive. 
A>b: 
B>a:sq <a:ixx.par 


9. Squeeze all ASM and C files on the A drive and put’ the 
results on the B drive. Capture the progress comments in the 
file "out" without displaying them. 

A>fls b: *.asm *.c Isq >out 


10. Preview the first 24 lines of each squeezed ASM file 
THEN unsqueeze them (unless stopped via cnt!-C). 

A>fls -24 *.aqm a: *.aqm lusq 
Note that specification of a destination drive cancels 
previewing. 


RECOMPILATION: 
These programs are written in C and the instructions are for 
the BDS C compiler. The libraries must have been adapted for 
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SwesG i170 &@5S uescrived in ive.bl. 


The procedures below indicate the various C language source 
files (file type .C) required to recompile. Those files 
Contain #include statements which cause header files (file 
type .H) to be read and compiled. The BDSCIO.H header file 
Contains information about your system, including how’ much 
Space to reserve for file buffers. You should use your own 
version of this file. 


The source files DI02.C, SQDIO.C and USGDIO.C are identical! 
If you only get one, just use PIP to create the rest. They 


are separate only to provide separate CRL files, which are 
needed because of the different external variable options. 
Note that they do not include all the header files, 


therefore the other source files must include the dio 
related headers first. 


DIO.C is supplied with BDS C. The above three files differ 
from the official version only by a change to the dioflush 
function to ensure TEMPIN.$$$ is deleted before another file 
is renamed to that name. (CP/M is stupid enough to make two 
files of the same name!). 


The procedure for building the S@.COM and USQ.COM files from 
their source files follows. Note that I have renamed the 
first phase of the BDS C compiler to CC.COM. Also I will 
assume the BDS C package is on drive D and the SQ@ and USQ@ 
related files are on B along with BDSCIO.H and DIO.H. 


Each CC command produces a CRL file with specific addresses 
for external variables. If you recompile a file with the 
same value in the -e option you don't have to recompile the 
other files, just do the desired CC and then repeat’ the 
entire CLINK. 


CLINK's -s option prints statistics. Top of memory means the 
current TPA. Stack space is what's left over. These programs 


require stack space for local variables, including some 
healthy i/o buffers. Also some functions are recursive. If 
SQ doesn't have several K of stack space it will probably go 


crazy and do almost anything. 


For SQ (note not all use -o): 
D>cc b:sq.c —-o —e3200 

D>cce b:sqdio.c ~—e38200 

D>cc b:tr1.c —-o —e3200 

D>cc b:tr2@.c —o —e38200 

D>cc :io.c -o —e3200 

D>clink b:sq sqdio tr2 tri io -s 


o 


The tinker will display some statistics. Check that the last 
code address is less than the start address of the external 
variables (3200 in this example). If not, repeat the above 
with a higher address in the -e options. 


For USG (note: —e2800 may be enough. Note not all use —o): 
D>cc b:usq.c —-o —e2900 

D>cc b:usqdio.c —e2900 

D>cc b:utr.c —o —e2900 

D>clink b:usq usqdio utr —s 


Check the addresses as described above, 


For FLS: 
D>cc b:fls.c 


1UR.C 


os ore at 
D>clink b:fls dio2 


IN CASE OF TROUBLE: 

I welcome suggestions and bug reports, but you must 
understand that some of the ideas I get would involve almost 
as much program development as the original package. I have 
what I want and (I hope) what most users want, so I am not 
motivated to spend many more months creating something 
entirely different which just happens to involve data 
compression. The data compression routines are probably less 
than half of this package, and are designed to operate on 
large blocks of data, such as files. 


Dick Greenlaw 

251 Colony Ct. 

Gahanna, Ohio 43230 

614-475-0172 weekends and evenings 
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D> 

-CATALOG070 
A-NEW NBP 
BOMBER NBP 
BOXING NBP 
CRCK COM 
DECISIONNBP 
DEPTHCHGNBP 
DRUNK NBP 
ELIZA NBP 
ENTERPRINBP 
FORTH110ASM 
GROWTH NBP 
HDSUB NBP 
HEXDEC NBP 
INDEX NBP 
INTERESTNBP 
LOANPAY1NBP 
MICKEY NBP 
NAVAID1 NBP 
NBP HLP 
PEANUTS NBP 
PLOT NBP 


More.. 

PRIME NBP 
QUBIC NBP 
RECURSIVNBP 
SIG/M LIB 
STARLANENBP 
STARTRESNBP 
STORY NBP 
TIME NBP 
TIMEPRNTNBP 
UFO NBP 


XREF141 ASM 
33 file(s). 


SIGMUG vol. 


26 directory entries remaining. 


D>STAT O: 


Bytes Remaining On O: 14k 


D> 


70 


2/11/86 


TYPE O:-CATALOG.070 


Sig/M 


index 


070.01 
070.02 
070.03 
070.04 
070.05 
070.06 
070.07 
070.08 
070.09 
070.10 
070.11 
070.12 
070.13 
070.14 
070.15 
070.16 
070.17 
070.18 
070.19 
070.20 
070.21 
070.22 
070.23 
070.24 
070.25 
070.26 
070.27 
070.28 
070.29 
070.30 


NorthStar Basic Programs 
Forth 1.1 for CP/M 
Cross Reference for .ASM/.PRN 


volume 70 
-CATALOG.070 
CRCK -COM 
name size 
A-NEW -NBP 3K 
BOMBER’ .NBP 3K 
BOXING .NBP 3K 
DECISION.NBP 5K 
DEPTHCHG.NBP 2K 
DRUNK .NBP 4k 
ELIZA «NBP 7K 
ENTERPRI.NBP 7K 
GROWTH .NBP 4K 
HDSUB -NBP 1K 
HEXDEC .NBP 2K 
INDEX .-NBP 1K 
INTEREST.NBP 2K 
LOANPAY1.NBP 3K 
MICKEY .NBP 4K 
NAVAID1 .NBP 2K 
NBP -HLP 2K 
PEANUTS .NBP 4K 
PLOT «NBP 1K 
PRIME -NBP 1K 
QUBIC -NBP 7K 
RECURSIV.NBP 10K 
STARLANE.NBP 13K 
STARTRES.NBP 12K 
STORY ~NBP 2K 
TIME ~NBP 2K 
TIMEPRNT.NBP 1K 
UFO -NBP 8K 
FORTH110.ASM 62K 
XREF141 .ASM 43K 


contents of Sig/M volume 70 
released July 12, 1982 
checksum validation program 
ere description 
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FORTH rev 1.1 for CP/M 
Cross Reference for .ASM/.PRN 


Copyright (c) 1982 by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


D> 


tire whoP.HLPP 
NBP.HLP? 


A>TYPE O:NBP.HLP 
What are NBP files ? 
Using NBP files 

NBP file info 

Credit to donator 
:What are NBP files ? 


NBP files are Northstar Basic Program files 


:Using NBP files 


There are three (or more) ways to use/run these programs 
under the CP/M operating system. 


1. Buy a Northstar on CP/M conversion package from either: 


a) Infosoft in Westport, CT 
b) Soho Group somewhere in New York state 
2. Use the NSCPM48.ASM package on the SIG/M disk 10 
3. Obtain a copy of Northstar Basic patched to run under 
CP/M from a friend. 
4. Figure something out yourself if you're a 'hacker' 


Some of the above may require changing the file types of these 
Northstar basic program files to an extension of '2', ie 


STARTRE$.2 


o Several of these will require you to have a copy of North Star Basic. 
:NBP file info 


These NBP files are NOT ASCII files and can not be easily listed, 
they are in a 'tokenized' form. They require a version of Northstar Basic 
Or some other program for listing. 

:Credit to donator 


These and other NBP programs are being released into the 
"Public domain' during the next few months (years?) by: 


Software Ltd 
Woodbridge, Ct 


January 23, 1982 


A> 
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~CATALOG111 
BACKUP ASM 
BACKUP COM 
BACKUP DOC 
BIGBURSTASM 
BIGBURSTCOM 
BIGBURSTDOC 
CRC COM 
FLOPCOPYASM 
FLOPCOPYCOM 
FLOPCOPYDOC 
INTERCPMASM 
INTERCPMCOM 
INTERCPMDOC 
INTERDOSASM 
INTERDOSCOM 
INTERDOSDOC 


JP DOC 
MULTCOPYASM 
MULTCOPYCOM 


More.. 

MULTCOPYDOC 
SIG/M LIB 
24 file(s). 


1K 
2K 


SIGMUG vol. Jit 


37 directory entries remaining. 


D>STAT O: 


Bytes Remaining On O: 91k 


D> 


-. oS 2 


2/11/00 


oS Se 


TYPE O:-CATALOG.111 
Sig/M volume 111 Hard disk utilities 


-CATALOG.111 contents of Sig/M volume 111 
; released March 15, 1983 


CRC «COM checksum program 
SIG/M LIB donation program 


index name size cre description 


111.01 BACKUP .ASM 31K 95 28 Backs up hard disk where entire file 
111.02 BACKUP .COM 4K DA 72 fits on one floppy disk. 

111.03 BACKUP .DOC 7K E5 0c / 

111.04 BIGBURST.ASM 12K 22 89 Backs up hard disk where file must be 
111.05 BIGBURST.COM 2K cC 1C stored on mutiple floppies because of 
111.06 BIGBURST. DOC 3K 45 E8 size. 

111.07 FLOPCOPY.ASM 17K B5 9E Backs up a floppy to a floppy in a 
111.08 FLOPCOPY.COM 3K 7A 23 hard disk system with only a single 
111.09 FLOPCOPY.DOC 2K 4A CD floppy. 

111.10 INTERCPM.ASM 7K 7E 21 Copy files between 5” and 8" CP/M. 
111.11 INTERCPM.COM 3K 7C 87 / 


111.12 INTERCPM. DOC 2K OB D5 is 
111.13 JP ~ASM 1K CB C5 / 
111.14 JP - COM 1K 5B 58 / 
111.15 JP «DOC 1K CB 32 / 


111.16 INTERDOS.ASM 20K EO Dl Moves data files between CP/M and 
111.17 INTERDOS.COM 6K E2 13 North Star disks. 

111.18 INTERDOS. DOC 6K 75 Bo / 

111.19 MULTCOPY.ASM 14K 7D 68 Similar to PIP but prompts for new 
111.20 MULTCOPY.COM 2K D1 FB floppy when first one filled. 
111.21 MULTCOPY. DOC 1K 7E F& / 


Copyright (c) 1983 by Sig/M-Amateur Computer Group 
of New Jersey Inc., Box 97, Iselin NJ, 08830-0097 


D> 


thot 4ssDArNul. JUL 
BACKUP.ASM USED TO BACKUP HARD DISKS 
WRITTEN BY G. YOUNG, PO BOX 3218, NO. HOLLYWOOD, CA 91609 


The Winchester hard disk offers file storage approaching mainframe 
performance on microcomputers. The problem of backing up the data is 
a serious drawback, however. The only option currently available is to 
use PIP to copy one file at a time. To PIP an entire file type would 
guickly fill a floppy and not copy the rest of the files. To PIP one 
file at a time would be unbearably time consuming. Another alternative 
is obviously necessary. 

BACKUP is used to copy files from large volume hard disks to low 
volume floppy disks for backup and recovery purposes. It is intended 
for CP/M files where the entire file will fit on one floppy disk. 

There are three phases in BACKUP. The first phase reads the 
directories of all the hard disks, sorts the file names into alphabetical 
order within file type, and prints a master directory by type on the list 
device. The program assumes drives A:, B:, and C:. If there are more 
drives than this, change NODRV to the number of drives, change DRIVE 
to add in the extra drive letters, and reassemble. 

Next the program attempts to restrict the files it backs up. Since 
a twentysix megabyte disk could take up to forty four double density 
floppy disks to completely back up, only essential files are saved. 
Duplicate files are eliminated saving only the file on the lowest 
drive (A: is saved if the file also exists on B: or C:). The file 
is considered duplicate if the names are the same, the actual contents 

are not compared. Certain file types are considered unnecessary and 

are not saved. PRN, BAK, SYM, HEX, and TMP are eliminated from the 
backup list. To change this list of skipped file types, simply change 
the variable NOSKIP and SKIPFILES within the program and reassemble. 
Each file type will then be displayed on the console and the program will 
ask if you- want to back up all of the files of this type (enter Y), skip 
all of the files of this type (enter N), or select certain files within 

Oriis type (enter S). If you enter S, each file name within the current 
type will be displayed on the console and the program will ask if you 
want to backup this particular file (enter Y), skip this file (enter N), 
or continue to backup all the rest of the files within this type without 
listing each name (enter C). This feature is used to restart the backup 
if it was terminated before it completed during a previous run. At 
this time you can also skip any files that will not fit entirely on 
one disk. The program will skip this file also if it encounters it, but 
it will prompt for a blank diskette to try the backup before it discovers 
that it cannot be backed up with this program. When the list of files 
to backup has been reduced, the list will be printed and the program will 
ask if it should begin the copy procedure or abort. This allows you to 
rerun if the list of files to backup is not ‘correct. 

Finally, the backup procedure will begin. The program uses all of 
RAM from the end of the file list table to the end of the TPA as the 
buffer for copying files. As the files are finished being copied, the 
tabled is decreased and the buffer area is increased thereby speeding up 
the copy process. The program will display a message asking to mount 
a floppy in the first drive (assumed to be D: but changable with the 
program) and enter a three digit disk id or "END" to terminate 
prematurely. This may happen if you run out of diskettes!!! 

The first file that BACKUP writes on the floppy is a null file. It 
hag zero length so it only takes up one directory entry and no space on 
the disk. This null file has the name equal to the eight character date 
listed on the reports and the file type is the three character disk id. 
fhe purpose of this file is to identify the disk against the directory 
Misting and to automatically mark the date. The 
heading line for an index report will then be printed on the list 
device showing the disk id and current date. As the files are copied, 
v the index report is created showing the files copied to each floppy. 
\ While the file is being copied, the file name will be displayed on the 
console. When the file has been completely copied, the file name will 
koe 2? ed to the index report. If the file will not fit completely on 


vhe LT_oppy, the file name will be deleted from the floppy directory, a 
new floppy requested, and the file recopied to the new floppy. This 
Process continues until the entire file name table has been processed 
using as many floppy disks as required. 

Restoring or recovering can be done with PIP. You can PIP the 
entire floppy disk to the hard disk, or using the disk id/file name index, 
restore only certain files. 

hen using PIP to copy any REL files back to the hard disk, be sure to 
use the OV option in PIP. 

The source code is provided in file BACKUP.ASM for your convenience 
in changing certain parameters for your installation. The variables that 
may need to be changed are all on the first page of the source and are 
the following: 


NODRV This is the number of hard disk drives. Set to 3 if you have 
one hard disk named A: B: C: 
DRIVES This is the letters for the drives to search. Set to ABC if 


you have one hard disk, and the hard disk is addressed before 
any floppy disks. 

BACKUPDRV This is the floppy drive letter that the backup will be copied 
to. Set to D if you have hard disk drives A B and C. 

NOSKIP This is the number of file types in the file skip list. 

SKIPTYPE This is the list of file types to skip. It is normally set 
to PRNHEXSYMBAKS$$TMP to skip those six file types. 

LINESPAGE This is the number of lines per page and is used to print the 
various directories. 

RECLINE This is the number of file names that will appear on one line 
in the directories. 


The program uses the COMPUTIME board to get the date, but the code 
is in the program to request the date from the console. Just remove 
the * in the columns to convert the code from comments if you do not have 
a clock board. 


6/23/82....RESTART CAPABILITY ADDED 
BY ENTERING BACKUP FILENAME.TYP THE PROGRAM WILL SKIP THE CROSSREFERENCE 
REPORT AND POSITION THE LIST TO FILENAME.TYP AND REPROMPT FOR FILES TO 
BACKUP FROM THAT POINT. 

EXAMPLE A>BACKUP LOAD.COM 


D>TYPE O:BIGBURST.DOC 
BIGBURST.COM 
(BIG file BackUp/ReSTore) 


Copyright 1982, Gary Young, PO Box 3218, North Hollywood, CA 91609 
Permission granted to copy for non-commercial and personal use. 


The purpose of this program is to backup and restore files from 
a hard disk to floppy disks where the file is too big to fit on one 
floppy. The program works by copying the big file to multiple files 
where each file has a sequence number for the file type. The last 
record of the last file has an indicator that there are no more files 
to load. 
To backup a large file, enter 
A>BIGBURST TESTFILE.ASM/B 
Where TESTFILE.ASM is the large file on the hard disk and the "/B" 
tells the program that this is a BACKUP operation. The program 
@Qrii make sure the file exists on the hard disk, and as you to 
mount a floppy. It will name the file on floppy 1 a8 TESTFILE.001, 
file on floppy 2 as TESTFILE.002, etc until the entire file is copied. 
To restore the large file, enter 
\' A>BIGBURST TESTFILE.ASM/R 
v4 Where TESTFILE.ASM is the large file on the hard disk and the "/R" 
tells the program that this is a RESTORE operation. The program 
. 1 then tell you to mount the diskette containing TESTFILE.001. 


, 79u enver tie wrong diskette, it will teil you to mount tne 
right one. The pogram creates TESTFILE.$$$ until the entire 
process is complete. If TESTFILE.ASM already exists on the hard 
disk, it will be renamed TESTFILE.BAK and any other copies of 
TESTFILE.BAK will be deleted. When the restore is successful, 
it will rename TESTFILE.$$$ as TESTFILE.ASM, but you will still 
have the original file as a backup if neccessary. 

: The only program modification required is to set the floppy disk 
drive and reassemble. It is currently set for drive D: as indicated 
in the line 'FLOPPY EQU 4'. If your floppy is on F: set that to 5, 
G: = 6, ...A:=l, B:=2, C:=3 etc. The program uses all of available 
memory as the copy buffer. For diagnostic purposes, the program prints 
out the record number just copied after copying each buffer. This 
can be removed be deleting all references to DEBUG. 


D>TYPE O:FLOPCOPY.DOC 
FLOPCOPY.ASM FLOPPY DISK COPY PROGRAM USING 1 DRIVE AND A HARD DISK 
WRITTEN BY G. YOUNG, PO BOX 3218, NORTH HOLLYWOOD, CA 91609 


FLOPCOPY IS A PROGRAM USED TO COPY ONE FLOPPY DISKETTE TO ANOTHER FLOPPY 

IN SYSTEMS THAT HAVE ONLY ONE FLOPPY DRIVE BUT HAVE A HARD DISK. IT WORKS 

AS FOLLOWS: READ THE DIRECTORY OF THE FLOPPY DISK USING THE MASK IN THE COMMAND 
TO CREATE A LIST OF FILES TO BE COPIED (EXAMPLE: FLOPCOPY *.ASC TO COPY ALL THE 
ASC FILES FROM ONE FLOPPY TO ANOTHER). THEN, USING THE LIST IN MEMORY, COPY 
THE FILES FROM THE FLOPPY TO THE HARD DISK. IF THE FILE ALREADY EXISTS ON THE 
HARD DISK, ASK IF YOU WANT THE FILE COPIED OVER WITH THE FLOPPY VERSION AND 

SET AN INDICATOR IN THE FILE LIST THAT THIS FILE WAS ALREADY THERE. THEN THE 
PROGRAM WILL REQUEST THE BLANK DISKETTE THAT WILL BE THE DESTINATION DISK TO BE 
MOUNTED. USING THE FILE LIST NOW IN MEMORY, THE FILES ARE THEN COPIED FROM THE 
HARD DISK TO THE BLANK FLOPPY. WHEN ALL FILES HAVE BEEN COPIED, THE PROGRAM 
WILL ASK IF ADDITIONAL COPIES ARE TO BE MADE. IF NOT, THE FILES ARE DELETED 
FROM THE HARD DISK. IF THE FILE WAS ALREADY ON THE HARD DISK AS DETERMINED 

Y INDICATOR SET PREVIOUSLY, THE FILE WILL NOT BE DELETED. THE PROGRAM IS 
MART ENOUGH TO DETECT A FULL DISKETTE CONDITION AND A COMMAND WITHOUT 
A MASK. 


D>TYPE O:INTERCPM.DOC 
INTERCPM.ASM COPY FILES BETWEEN 5” AND 8" CP/M 
WRITTEN BY G. YOUNG, PO BOX 3218, NORTH HOLLYWOOD, CA 91609 


THE SITUATION AROSE THAT I WANTED TO COPY CP/M FILES FROM MY NORMAL 8" 
SYSTEM TO MY CP/M SYSTEM ON 5" NORTH STAR DRIVES. THE BIOS FOR THE 5" WAS 
NOT AVAILABLE, SO I HAD TO "TRICK" CP/M TO DO THE COPY. MY NORMAL CP/M 
WAS LOCATED AT THE TOP OF 56K AND THE 5" CP/M WAS LOCATED AT THE TOP OF 
32K THEREBY ALLOWING BOTH COPIES OF CP/M TO BE IN MEMORY AT ONE TIME. 
INTERCPM WAS A PROGRAM THAT WAS LOADED BY THE 8" SYSTEM AT 100H BUT THE 
ONLY CODE AT 100H WAS A JUMP TO 500H WHERE THE REAL CODE FOR A SIMPLE FILE 
COPY PROGRAM WAS LOADED. AT 500H, THE PROGRAM WOULD BOOT THE 32K SYSTEM 
SO NOW THERE ARE 2 COPIES OF CP/M IN MEMORY. IN THE 32K SYSTEM I WOULD 
RUN A PROGRAM CALLED "JP 0500" (HANGOVER FROM THE NORTH STAR DAYS). THIS 
PROGRAM WOULD ALSO LOAD AT 100H, BUT SINCE MOST OF INTERCPM WAS AT 500H, 
INTERCPM WAS NOT DESTROYED. "JP" WOULD JMP TO 500H AND REENTER INTERCPM. 
NOW THERE ARE 2 COPIES OF CPM IN MEMORY, INTERCPM KNOWS ABOUT BOTH OF THEM 
AND HAS SAVED THE CALL TO BIOS AT 5H OF THE 56K SYSTEM AT ANOTHER LOCATION 
SO THAT THE 32K SYSTEM COULD PUT ITS CALL TO BIOS AT 5H. INTERCPM THEN 
DOES SUCCESSIVE CALLS TO BOTH CPM'S TO COPY THE FILES TO/FROM THE 5" AND 
8", RECORDS ARE ONLY BUFFERED 128 BYTES AT A TIME SINCE MUCH OF MEMORY 


O's TAKEN UP BY THE OTHER CPM SO IT IS NOT REAL EFFICIENT, BUT IT WILL 


DO THE COPY CORRECTLY IN THE FEW INSTANCES THAT I NEEDED IT. 


D>TYPE O:JP.DOC 
JP.ASM JUMP TO THE ADDRESS IN THE ARGUMENT 


TAKEN FROM AN EARLY VERSION OF DOCTOR DOBBS JOURNAL 
mHT& PROGRAM IS USED BY INTERCPM TO RETURN TO THE PREVIOUS CPM. 


ti -4 s4PURTANT TO NOTE, HOWEVER, THAT TO JUMP TO SU00H, ENTER 0500 NOT 500. 


D>TYPE O:INTERDOS.DOC 
#JUST ON 
#offs 10 
#SPACE 2 
TITLE INTERDOS DOCUMENTATION 
<INTERDOS 


[TINTERDOS is a CP/M program for moving data files from North Star 
disks to CP/M disks and back. CP/M is a trademark of Digital Research, 
INTERDOS is not a Digital ReSearch product. INTERDOS works by loading 
the North Star DOS into memory while CP/M is loaded and making calls 
between the two operating systems to do the disk I/O. In addition to 
simple file copy, INTERDOS will make certain format changes also.] 

[The standard CP/M record format for ED or ASM files is the text line 
followed by a carriage return and a line feed. There are several formats 
for North Star, but the one addressed in INTERDOS is the format used by 
SECRTARY, XEK, and several old assemblers. This format is character 
count, four ASCII digits for the line number, and a carriage return. 
INTERDOS will copy either from North Star to CP/M or CP/M to North Star. 
If you are copying from North Star to CP/M, five conversion options are 
available. First, of course, is file-to-file copy without conversion. 
Second, SECRTARY format to CP/M ASM format. With this conversion the 
line numbers are stripped off, tabs are inserted in certain locations 
and both a carriage return and a line feed are added to the destination 
line. The third format is similar to the second, but no tabs are 
inserted. The fourth format is to create a file on CP/M that can be 
read for CP/M BASIC. This is called the SECRTARY to CP/M BASIC conversion 
and is similar to the third option except that the line numbers are left 
on. The output record will contain the four ASCII character line number, 
the text line without inserting tabs, and a carriage return and line feed 

t the end of the line. The last option is the North Star BASIC to CP/M 
BASIC format. North Star BASIC files contain the line number as a binary 
two byte field, and the BASIC keywords are kept as one byte tokens. This 
conversion option converts the line number to four ASCII characters, 
converts the tokens to the ASCII equivalent and adds a carriage return 
and line feed at the end of the line. NOTE: THE LINE NUMBERS IN THE BASIC 
PROGRAM MUST NOT BE GREATER THAN 9999. Renumber the lines in BASIC before 
doing the file copy if necessary. Also this only converts the lines and 
not the actual code. There are several differences between North Star 
BASIC and CP/M BASIC which have to be changed before a North Star BASIC 
program can be run under CP/M.] 

[When copying files from CP/M to North Star, there are two options. 
First is file-to-file copy without conversion. Second, convert a CP/M 
hex file to North Star type 2 executable file. The second conversion 
takes into account that ASM leaves gaps in the hex file where undefined 
code was reserved. INTERDOS fills these gaps with zeroes. It assumes 
that the file has the type and go address set properly so it ignores the 
hex file addresses except for filling gaps. In both options, the file 
must have already been created under North Star DOS.] 

[INTERDOS will work with single or double density disks. The source 
code is given because you may want to change the density or add additional 
conversion formats of your own. There are two equates at the beginning 
of the program that you may want to change. The first is NSBOOT and is 
the address of the ROM on the North Star disk controller board. This is 
used to jump to in order to boot in the pos. In older systems, this 

Orddress was E900, but in the newer and double density systems, this 
Waddress is E800. The second equate that may be changed is DENSITY. This 
is the density of the system and should be set to "S" for single density 
or "D" for double or quad density.] 
A [Operation of INTERDOS is simple. Mount a disk into the North Star 
m drive that contains the North Star DOS. Then type the CP/M command 
INTERDOS. INTERDOS will load, print the signon message and ask 
“peRooT NORTH STAR DOS (Y¥/N)?". At this point enter Y and the program 


Wlsa- jump to E800 (or E900) to boot DOS. DOS will gain control and type 
the * or +. Type JP 100 to DOS to return to INTERDOS. INTERDOS will 
reexecute and again ask "REBOOT NORTH STAR DOS(Y/N)?". This time type N. 
Then it will ask "DESTINATION SYSTEM (C/N)? ". Enter C to copy from 
North Star to CP/M or enter N to copy from CP/M to North Star. A 
verification message will then be displayed. Next it will list the 
possible formats and ask for character 0 thru 5. If you enter an 


@irvaria format or a format that is invalid for that copy type (such as 


orth Star BASIC to CP/M BASIC when you are copying CP/M to NS), the 
options will be relisted and you will again be asked to enter the format.] 

[The program needs to know when to stop the copying process. In most 
North Star formats, the end-of-file mark is an 01. It can also count 
blocks and stop when the block count exceeds the amount listed in the 
directory. The program will ask "EOF USING 01 OR BLOCK COUNT (1/B)?". 
Enter 1 if it should stop when it encounters an 01 byte or enter B if it 
should stop when it reaches the block count.] 

[Then the program will tell you to mount the disks and enter return. 
This makes sure the disks are ready so that when it asks for the file name 
it can search the disk to be sure the file is there if it should be.] 

(Finally it will ask for the file names. The CP/M file name is in the 
standard format X:xxxxxx.ttt If a carriage return is entered without 
entering any characters, INTERDOS returns to CP/M. The North Star 
file name follows. the North 
D>TYPE O:MULTCOPY' » DOC 

MULTCOPY -MULTIPLE FLOPPY DISKETTE FILE COPY 


THE PURPOSE OF THIS PROGRAM IS TO COPY A GROUP OF FILES FROM A HARD DISK TO 
MULTIPLE FLOPPY DISKS. IF YOU ENTERED "PIP D:=LN*.COM" AND THERE WERE MORE 
COM FILES THAN WOULD FIT ON ONE FLOPPY, PIP WOULD STOP WHEN THE FIRST DISK 

WAS FULL. MULTCOPY WILL PROMPT FOR ANOTHER DISK WHEN THE FIRST ONE IS FULL 
AND CONTINUE TO COPY THE REST OF THE FILES. THE FLOPPY DISK DRIVE IS HARD 
CODED IN THE PROGRAM, BUT THE SOURCE HARD DISK MAY BE SPECIFIED IN THE COMMAND. 


oe EXAMPLE: MULTCOPY B:*.ASC 


WOULD COPY ALL ASC FILES FROM HARD DISK B: TO THE FLOPPY DRIVE (D: IN 
MY VERSION) AND WOULD REQUEST MULTIPLE DISKS AS EACH GOT FULL. 


D> 


POLY-vuU 
#PV349 


K&M Company 
TORRANCE, CA 90503 


fe) 


oO 


~CATALOG134 
ABSTRACT134 
ANIMALS COM 
ANIMALS PAS 
BEASTS gaa 
BEASTS QQx 
BINTOHEXPAS 
CHECKS COM 
CHECKS poCc 


CHECKS 280 
CLEAN PAS 
CLEANPRTPAS 


CONVERT DOC 
DRVCHK PAS 
EXAMPL CHK 


EXAMPL DOC 
EXAMPL NAM 
GETFILESPAS 


GLOBALS INT 
GLOBALS RN$ 
HEXTOBINPAS 
MACRO SRC 


More.. 

PASZCODEINT 
PASZCODERN$ 
PROFILE REL 
PROFILE SRC 
TP PAS 
TRIGLIB PAS 
TSTAN2 COM 
TSTAN2 PAS 
380 file(s). 


SIGMUG vol. 


27 directory entries remaining. 


A>STAT O: 


Bytes Remaining On O: 1k 


A> 


a 2 


134 


6/12/85 


TYPE -CATALOG.134 
SIG/M Volume 134 PASCAL Z USERS GROUP VOL 26 


-CATALOG.134 contents of SIG/M Volume 134 
released September 9, 1983 


ABSTRACT .134 information regarding this disk 
index name size cre description 


1384.01 ANIMALS .COM 26K 5F 95 animal guessing game without 
1384.02 ANIMALS .PAS 41K 80 30 prior "bugs" 


1384.03 BEASTS .@Q0 1K 8D 23 
184.04 BEASTS .QQX 1K F7 EC 
184.05 BINTOHEX.PAS 2K 85 3F converts binary to hex 


134.06 HEXTOBIN.PAS 3K ES OD / 
1384.07 CHECKS .COM 9K 82 AS checkbook program 


184.08 CHECKS’ .DOC 20K 08 04 / 

1384.09 CHECKS’ .z80 53K FA 24 / 

1384.10 EXAMPL~ .CHK 1K EE B3 ra 

1384.11 EXAMPL  .DOC 6K F6 94 / 

134.12 EXAMPL .NAM 2K 9A 80 / 

134,13 CLEAN .PAS SK 67 7F filters characters to printer 
134.14 CLEANPRT.PAS 5K BF 87 / 

134.15 MACRO »SRC 4K B8 2D collection of macros 

134.16 DRVCHK .PAS 2K D6 4F procedure to check filename drive 
134.17 GETFILES.PAS 2k 0S 84 procedure to get files 

134.18 CONVERT .DOC 2K 74 EA converts numbers between string 
134.19 GLOBALS .INT 1K 3F DD and real and integers to string 
134.20 GLOBALS .RN$ 2K 85 49 if 

134.21 PASZCODE.INT 4K B1 66 i 


1384.22 PASZCODE.RN$ 10K DE 78 / 
134.23 PROFILE .REL 1K 48 EB Hipad routine to fill array 
134.24 PROFILE .SRC 8K DC 32 / 


134.25 TP .PAS 1K 71 CF / 

134.26 TRIGLIB .PAS 4K D8 OB seven trig functions 

134.27 TSTAN2 .COM 14K 17 06 converts regression coefficient 
134.28 TSTAN2 ~ .PAS 1K DA F5 to slope angle 


SIG-M Library -CATALOG Volume Number-134, 28 Files cataloged. 


Copyright (c) 1983 by Sig/M-Amateur Computer Group of New Jersey Te 
P.0.Box 37, Iselin NJ, 08830-0097 USA 


A> 


type o:abstract.134 


CONTENTS OF VOLUME #26 


i. This is the second part of several disks donated by Greg 
Acland.They are different in that most of the programs are 
Procedures or Functions. There are some programs but the emphasis 
is on building up a library. Greg has also adapted some 
algorithms from the collected algorithms of ACM so they are heavy 
in MATH. Many of these call each other so I have tried to keep 
them togeather. They all came with REL files but I did not 
include them to save space although they did prove they could be 
compiled and assembled. All adapted to Pascal/zZ. 


TSTAN2.COM/PAS Inputs a regression coefficient to be 
converted to the correspnding slope angle. 


TRIGLIB. PAS Contains seven (7) Functions dealing 
with trig. 

PROFILE.SRC A PASCAL/Z external routine to fill arrays xX 
and Y using a Houston HIPAD Digitizer for 
input. 

TP.PAS This program uses PROFILE. 

MACRO.SRC Some macro's Greg has collected. 

DRVCHK. PAS A procedure to ensure that a character to be 
used as a filename prefix refers to a legal 
drive. 


2. Harry Muttart, of Cupertino Ca, has submitted some nice routines. 


CLEAN. PAS 

CLEANPRT.PAS These two were used to filter characters 
that upset his printer. 

BINTOHEX.PAS This converts each character of a binary 
file to two ASCII hex digits. 

HEXTOBIN.PAS This converts the other way, hex to binary. 

GETFILES.PAS Harry didn't say anything about this procedure 
but it looked interesting so I threw it in 
anyway. It may be a duplicate but only 2K made 
it a cheap gamble. 


3. Roy Allen, of Mill Valley CA, has done some updating and submitted 
some new stuff. 


ANIMALS.COM/PAS This is a simple game that Roy submitted 
before. He found two bugs so he is re-submiting 


it. 
CONVERT .DOC This is the DOC for the rest of his submissions. 
GLOBALS.RNS$ This converts numbers between STRING and REAL 
PASZCODE.RN$ representation. 
GLOBALS.INT This converts integers to STRING representation. 


PASZCODE.INT 


4. This 280 program fascinated me because I had written a check 
program in Pascal and also in DBase II. It is interesting how 
Ralph Sherman, of Forest Va, handled everything. I got this through 
the BigBoard Users Group (one of our members is a member) and hope 
they continue to expand and grow. Anyway, here is a example to 
examine on how to write an applications program in assembly. 


CHECKS.COM/Z 80/DOC A check program in assembly. 
EXAMPL.CHK/.NAM/DOC The check demo to practice upon. 


Pee base ok 


The CHECKS program was written for my personal use and is 

Placed in the public domain for anyone who wants to use it. 
(No business use please) Since it is a 'freeby', don't complain 
about the organization of the program, but if you should 


encounter any bugs, please notify me by letter and I will try to 
fix them. Several restrictions are inherent in the program and 
you must be able to live with them. If you can't, then don't 


bother with the program. 
RESTRICTION #1 


The maximum value which the math package can handle 

without overflowing is $83886.07. Amounts which exceed this 
value will be displayed as the amount in excess of $83886.08. 
Overflow will occur if you have more than this amount of money in 
your account at any point in the year, or if the total value of 
the checks exceed this amount when listing out the checks. No 
error message is printed out if overflow should occur. If you 
exceed this amount, you can afford to buy something better 
anyway. 


RESTRICTION # 2 


The program will onty allow 255 different check names in 

any year's file. The checks program was’ translated from a 
program I had written for my 6500 system, and made extensive use 
of the indexed instruction. I had a lot of check data that I 
wanted to continue using with the Z80 system, so I merely re- 
coded the assembly language program and _ used the same 
organization of the data in the files. 


RESTRICTION # 3 


The program requires the user to enter check names as 

three character mnemonics, although it keeps in the file the 
entire check name for later listing. For example, when I enter a 
check to Fidelity National Bank, I would use the mnemonic FNB for 
the check name. You quickty learn how to choose a good mnemonic 
for the check name, and can always get a listing of mnemonics 
which you have used previously in case you should forget one. 


If you feel that you can live with these restrictions, 
then give the program a try. The features and operating ease of 
this program will quickly make you ignore these limitations. 


A little more about the program before we get down to the 
nitty-gritty. Checks will run on either CP/M 1.4 or 2.2. The 
program keeps track of two data files with the name types  .CHK 
and .NAM. The filename.CHK file has all the data for the actual 
checks. Each check entry is packed into eight bytes of code and 
the distribution copy allocates 8 kbytes of memory for the 
checks. This gives you the ability to handle 1024 checks in a 
given year. The .NAM file contains the name mnemonics and a list 
of the corresponding full check names. Full check names are 
limited to a 82 character string. 


The user may specify the disk on which the .CHK and .NAM 

files are located. If no name if given for the .NAM file, the 

program will assign the same filename for the .NAM file as was 

specified for the .CHK file. I use the filename 1981 for the 
ek file for year 1981 which sutomatically assigns files 


UV 
wl 


fee evs Gnd 1981.NAM for use. Other people who have used this 
Program find that they normally write checks to the same people 
year after year and do not overflow the 255 name restriction. 
For this reason, you can save a lot of typing by using the same 
name file year after year. To do this, one might type 1981 
(space) NAMES which would assign files 1981.CHK and NAMES.NAM as 
the files to be used. Note that the user does not specify’ the 

@ Filename extension because the program does it for you. If you 
should try it, the program wil! issue an error message. 


Because my wife and I both share the same checking 
account, but she has her own checks which might duplicate my 
check numbers, the program allows you to set a 'W' flag to keep 
to two entries separate. The program also has other flags which 
the user can set upon entry, and yes, as you might expect, you 
can get a tisting of checks depending on the flag set. The flags 
which can be set on the distribution copy, and the meaning which 
I place on them are as follows: 


W Wife's checks 
R Returned check 
I Income tax deductible 


All three of the above flags may co-exist in the _ same 
check entry plus one of the following: 


Parts for computer 
School expenses 
Utility bills 


C Car expenses 

D Doctor bills 

E Entertainment expenses 
F Food 

G Gasoline 

H Housing expenses 

M Medicine 

P 

s 

U 


Five spare flags are also available, but have not’ been 

defined during the assembly. The method of setting or changing 
these flags will be discussed later. A check might have the flags 
IWRS set, which means an income tax deductible check, written by 
my wife which has returned from the bank for some school related 
expense. 


The program enables you to list all checks written to 

some mnemonic name, to list a monthly balance sheet, to compute 
the check balance, to compute the bank balance at the end of the 
month after returned checks are entered, to list outstanding 
checks, to list checks, deposits, and withdrawals from your 
account for any month, or for the year and to fix erroneous 
entries for a check, deposit, withdrawal, or change a mnemonic 
name or a full check name. 


Thats enough about what can be done, now lets get down 
how to do it. Let's assume it is the start of the year, and we 
are opening up a mew years record for say 1981. 


@ A>cuecks 1981 [NAMES] [optional entry] 


This will load CHECKS from the A drive and try to read a 

file for 1981 from the default drive, Naturally nothing will 
exist, and the program will tell you that it could not load the 
check file, and will go to the command mode. The program has 


assigned the names for the .NAM and .CHK files should data be 
; ed) =h6and.~=6 saved. AI! commands begin with a single alpha 


-arac er and will immediately execute unless an argument is 
required. In this case, the program waits for the argument and 
the carriage return before execution. If you type a ? , the 
Program will display all the command characters, their meaning, 
and print the number of names in the current name file. 


The first thing to enter is the balance in your account 

at the beginning of the year. Enter this value as a deposit by 
hitting the D key. The program will display the prompts for your 
entry and show you that this is deposit #1. Deposits and 
Withdrawals are automatically numbered with 255 deposits and 
withdrawals permitted in a years record. If you hit the space 
bar, the cursor is automatically tabbed to the next entry. The 
month is 1-12, the date 1-31, the amount assumed in dollars 
unless a decimal point is entered. Do not specify $ in the amount 
entry. Legal check , deposit , or withdrawal values are as 
follows: 


10000 
234.12 
1 

.23 


123 .1 is not legal 


For the mnemonic, you might consider STB 


When you hit the carriage return, the program analyzes 

the entry, and looks up STB in the name file to see if it exists. 
Since it does not, it will ask you if this is a new name. Type 
'Y' to indicate that it is and fill in the full name STARTING 
BALANCE when it prompts you for the full name. When you now hit 
the carriage return, your first deposit will be entered, and the 
mnemonic STB and the full name STARTING BALANCE wil! be’ entered 
into the name file. 


Now hit B. The program computes the balance by adding 

all deposits from the beginning of the file and subtracting the 
value of all checks and withdrawals from the account. Yes you now 
have a balance of the value which you entered. Now hit V. This 
command is similar to the balance command except only returned 
checks are subtracted. The result is the bank balance which 
should agree with your bank statement after entering all returned 
checks at the end of the month. A check is returned by typing 
the command R and entering in the check number. Since no checks 
have been written, the bank thinks you have the same amount. 


Suppose your first check is for cash. Hit C to enter a 

check. The check prompt now appears. Check numbers 1-9999 are 
valid check numbers. Fill in the data with the mnemonic CAS. 
Use the full name CASH when it comes time to do this. 


Now try the B and V commands again. Yes, the new balance 

is the difference between the check and the starting balance but 
the V command still shows the starting balance. As far as the 
program is concerned, the check is still outstanding. You can 
verify this by typing the command 0, which shows the check to 
still be outstanding. 


Type the command M and specify CAS when it asks for the 
check mnemonic. The M command lists allt checks which Match the 
mnemonic name written during the year, 


Now try to return the check by typing the command R. When 
asks for the check number, enter the one which you have 


envereua.,. Now re-try the B, V, and O commands. The check is No 
longer outstanding and the bank balance and check book balance 
Now agree. You can still find the check using the M command. 


When you are typing in any command and make a mistake, a 

control X will abort the command and return you to the command 
Oo You can use backspace (ctr! H) to correct mistakes on any 
entry. 


Since returning the check set the R flag, you can now 
find the check using the interrogate command I. If you’ specify 


the R flag, you can now see that a listing of all raturned checks 
is possible. The I command will ltist all checks which have the 
Specified flag set. (a handy way to find income tax deductible 
checks) 
Suppose 

I do, then you can use the W flag in the flag column’ when 
entering the check. Another way is to precede the check number 
with the letter W. Thus W128 is wife's check 123 while 123 is my 
check 1238. You can print all your wife's checks by using the 
interrogate command (I) and telling the program to use the W 
Flag. All other flags may only be specified in the flag column, 
So to flag all your utility bills for example set the U flag in 


the flag column when entering the check. 


Withdrawals are amounts automatically deducted from your 
checking account each month for say a car payment. Do not 
confuse withdrawals with the W flag which is the wife flag. To 
enter a withdrawal, hit the command W. Unlike a check entry, the 
withdrawal will automatically be deducted from the bank balance 
at the same time it is deducted from the check book balance. 


@::. A command begins auto-numbering of check entries and 

may be auto-numbered either with and without the wife flag. To 
auto-number wife's checks, type W(check number) when prompted. Do 
not put a space between the W and the check number. The control 
X command cancels the auto-number mode. 


The L command is used to list out checks, withdrawals, 
deposits, or the names which you have used. In the case of 
checks, withdrawals, or deposits, the program will ask which 
month to list. You can enter a month 1-12 for a specific month, 
or enter a O to list the entire year's activity. 


The T command lists a monthly balance sheet on the 
console. The month also is entered as 1-12 or a O for a yearly 
record 


The P command toggles the output to the printer for’ the 


next command. Thus command P followed by T will list the balance 
sheet on the printer. A command P followed by command M will 
list on the printer all checks to a specific mnemonic name. The 


print mode is toggled off at the completion of each command. 


The M command is one of the most valuable commands. In my 

case, all my electric power bills are to AEP for Appalachian 

Electric Power. Thus at the end of the year the command M with 

+] the mnemonic AEP will show the year's total for electric bills. 
In a similar fashion, C&P shows telephone bills, TEX my Texaco 


gasoline bills, etc. The I command with the G flag will print out 
all gasoline expenses to all companies during the year. 
More about the L command. The L command will also tet 


‘ list the mnemonic names and the full names which you have 


oa 


use... this is handy in case you forget one. Type command L and 
specify N for names. When it asks for the mnemonic name, you can 
hit an immediate carriage return to show all the names in_ the 
file. If you should just type A followed by a carriage return, 
Tt will show all mnemonic names starting with the letter A. In a 
Similar fashion typing CA will show all mnemonics starting with 
the two letters CA. It is pretty easy to at least remember’ the 
most logical first letter of the mnemonic which you might have 
used for the name. 


Now it is time to save the file away after an editing 
session. You can type @ to go to CP/M or S to save the current 
file but stay in the checking routine. The @ command will first 
ask you if you want to save the checks away before’ exiting. If 
you have made any changes, you had better do it or everything 
which you have added will be lost. The old file on the disk was 
copied into memory at the beginning of the editing session and is 
still there on the disk. If you type Y for yes, it will show you 
the names under which it will be saved. If you want to change 
the names type N after it asks you if the file names are OK?, 
You can use anything ltike the following 


B:1981 checks and names file on B drive 
B:1981 A:NAMES checks under name 1981 on B drive 
names under NAMES on the A drive 


One word of warning. Do not get the checks for one year 

mixed up with the name file for another year. The program has no 
way of telling that you have mixed things up and the names will 
be all mixed up on your check file. For this reason, use 
1981.CHK and 1981.NAM so no possibility exists for this error. 
Nothing disastrous happens if you get them mixed up until you 
make a new entry in the file. Check names are numbered as”7 they 
are entered and the check data file only has the number 
corresponding to the check name used. 


The S command saves the current check and name files’ on 

the disk and stays in the checking routine. This permits you to 
use the G command which gets a different years record for 
observation or modification. You can use the G command to _ look 
for various years activities without modifying any of the 
contents on the disk. 


To keep the bank people honest, at the end of the month 

when my checks return, I return all the checks enclosed with my 
statement and hit the V command. The balance shown should agree 
with the bank as long as no deposits have been made into the 
account which do not show in the bank statement. 


Naturally you will make some typing mistake sometime 
during the use of the program. The F command allows you~ to 
retrieve a check, deposit, or withdrawal from the records and fix 
it. When you enter the number of the item to be fixed, the 
display will show the entry as it has been typed. The entry may 
be fixed up as shown on the console display using the control 4H 
for backspace, the control A will add a space at the cursor, and 
the control D will delete the character at the cursor. A control 
B will set the cursor to the beginning of the entry being 
displayed for added convenience. You may hit the carriage return 
with the cursor at any position in the display and the entire 
contents of the display will be entered as shown. Using the 
prompts, you may change a name mnemonic, or the full name for 

z sh a4 Suiinse “ou can't remember sa mnamaonic hecause -ou 


eer a poor one the first time you entered it. By changing the 
mnemonic, all entries in the file will now show the new mnemonic. 


Yes, I can guarantee that sometime or other you will type 
the same check number in twice for two different entries. When 
you try to find the check to return it, only the first entry will 
be displayed and the second check with the duplicate entry can 
Oro be returned. And as Mr. Murphy would have it, the second 
entry had the wrong check number. The only way to fix this is 
to fix the number on the first check to some fake number which 
has not been used, then fix the wrong check and then re-fix the 
first check back to the correct number. Sorry, but that is the 
way it works. The only way to find this kind of error is to list 
the checks and hunt for that duplicate check number. 


Modifications: 


The size of the check and name files may be enlarged by 


changing the address at the equate NFILE. The check file 
starts loading at the address set by the equate at CFILE and 
memory space is available up to the address at NFILE. Names 


begin at NFILE and the rest of memory up to CCPBAS is available. 
Each name entry requires 5 bytes of code, three for the mnemonic 
and two bytes for a pointer to the full name. Since the maximum 
name entry is 32 bytes long, the longest name file possible is 
$435 bytes. Be sure you update CCPBAS to point to the first 
location before the base of your CCP to insure you do not 
overwrite the CCP. CCPBAS has been arbitrarily defines as $8000 
in the distribution copy. 


Five additional flags may be defined by replacing the % 
characters at the DEFB string at the ltabel CAT: with the desired 
eo: character. The flag characters N,W,I,R are reserved for use 
in the program and may not be doubly defined. 


Cursor control characters which may vary with different 
video displays are defined at the beginning of the source 
listing. The program may be warm started by jumping to 100H in 
case you should forget to save the data on the disk and returned 
to CP/M. You can do this by executing GO 100 if you are using 
CCPZ or by previously saving a zero tength file using the CP/M 
save command with the name GO and typing GO when you are in CP/M. 


Checks is only a 9k program, and will run in systems with as 
little as 16k of memory. To be safe, you should re-assemble 

the program after redefining CCPBAS to insure the name file does 
not overflow the CCP, and redefine NFILE to 4500H to give a 
little more space for the name file. 


Yes, the program has its limitations but it works and it 
puts a lot of power at a few keystrokes once you learn how to use 
it. I am willing to listen to all suggestions how to improve it. 


Ralph Sherman 
15 Hydaway drive 
Forest, Va. 


(804)-525-3167 


Q> 


» AAPL.DOC 


EXAMPL.CHK AND EXAMPL.NAM ARE DUMMY CHECK FILES CREATED SO 
YOU CAN PLAY WITH THE VARIOUS CHECKING ROUTINE COMMANDS. THERE 
°o.. TWO WAYS THAT YOU CAN CALL UP THIS FILE TO PLAY WITH. 


THE IMMEDIATE MODE: 

A>CHECKS EXAMPLE 

OR 

A>CHECKS 

AND AFTER THE SIGN-ON MESSAGE USE THE G COMMAND AND SPECIFY THE 
FILENAME EXAMPL WHEN PROMPTED FOR INPUT. 


NOW YOU CAN PLAY WITH THE VARIOUS COMMANDS. FOR EXAMPLE DO 
THE FOLLOWING: 
0---—-- DISPLAYS OUTSTANDING CHECKS 
B----— SHOWS THE BALANCE IN THE ACCOUNT 
V----- SHOWS THE AMOUNT THE BANK THINKS YOU HAVE 


NOW TRY TO SEARCH THE FILE BY FLAGS USING THE I COMMAND AND 
USE THE FOLLOWING FLAG CHARACTERS. 


I--R--SHOWS RETURNED CHECKS 

I-—W--SHOWS CHECKS WRITTEN BY MY WIFE 

I--G--SHOWS CHECKS WRITTEN FOR GASOLINE 
I--D--SHOWS DOCTOR BILLS 

I--C--SHOWS CAR EXPENSES 

I--U--SHOWS CHECKS WRITTEN FOR UTILITIES 
I--I--SHOWS INCOME TAX DEDUCTIBLE CHECKS (NONE YET) 


r+) NOW TRY TO GET A LIST OF THE MNEMONIC NAMES USED IN _ THIS 

FILE. TO DO THIS HIT L AND SPECIFY N FOR THE ARGUMENT. THEN HIT 
AN IMMEDIATE CARRIAGE RETURN WHEN ASKED FOR THE MATCHING 
CHARACTERS. NOW TRY TG GET A LIST OF MNEMONIC CHARACTERS 
STARTING WITH THE CHARACTER A. HOW ABOUT MNEMONICS STARTING WITH 
CA? 


NOW USE THE M COMMAND AND LIST ALL CHECKS WRITTEN TO TEXACO. 
You DID IT RIGHT IF YOU TYPED M AND USED THE MNEMONIC TEX. HOW 
ABOUT GETTING THE CHECKS I WROTE FOR MY POWER BILLS. Now, YOU 
PROBABLY DON'T REMEMBER THE MNEMONIC...SO HOW DO YOU FIND’ THEM. 
WELL THE ELECTRIC POWER BILL IS A UTILITY SO YOU CAN USE THE TI 
COMMAND AND LIST ALL THE UTILITIES AND HUNT FOR THE MNEMONIC TI 
USED THAT WAY. OR YOU COULD USE THE L COMMAND TO LIST NAMES AND 
FIND IT THAT WAY ALSO. EITHER WAY, YOU CAN FIND THE MNEMONIC AEP 
FOR APPALACHIAN POWER COMPANY. 


NOW, TRY RETURNING A FEW CHECKS. YOU CAN USE THE O COMMAND 

TO LIST THOSE OUTSTANDING CHECKS AND USE THE R COMMAND FOLLOWED 

BY A CHECK NUMBER WHICH IS OUTSTANDING. NOTICE THAT THE PROGRAM 
WILL DISPLAY THE CHECK AS IT IS RETURNED SO YOU CAN COMPARE THE 
AMOUNT OF THE RETURNED CHECK WITH THE AMOUNT IN THE PROGRAM..THIS 
HELPS YOU FIND SOME OF THOSE TYPING MISTAKES. IF THE VALUES DO 
NOT AGREE, YOU CAN USE THE F COMMAND To FIX THE CHECK. YOU MIGHT 
TRY MODIFYING A FEW CHECKS...FOR EXAMPLE...CHANGE THE AMOUNTS AND 
HIT THE B COMMAND TO SHOW YOU THE BALANCE BEFORE AND AFTER YOUR 

@ chance. TRY MODIFYING A FEW DATES..OR EVEN ADDING A FEW 


THE W FLAG IN THE FLAG COLUMN. USE THE I COMMAND FOLLOWED BY THE 
FLAG W BEFORE AND AFTER YOU MAKE THIS CHANGE TO BE SURE IT WORKS. 


NOW PRINT OUT A TALLY SHEET FOR JANUARY. DO THIS BY USING 
COMMAND AND SPECIFYING THE MONTH 1, HOW ABOUT GETTING THE 


" UN THE PRINTER. USE THE P COMMAND FOLLOWED BY THE 
COMMAND AND SPECIFY MONTH 1. TRY PRINTING OUT ALL THOSE GASOLINE 
BILLS ON THE PRINTER. YES, ITS THE P COMMAND FOLLOWED BY THE I 
COMMAND USING THE FLAG G. 


NOW ENTER A FEW CHECKS OF YOUR OWN. HIT THE O COMMAND TO 
FIND MY LAST OUTSTANDING CHECK NUMBER. NOW USE THE A COMMAND To 
@ SET THE AUTONUMBER MODE AND SPECIFY THE NEXT CHECK NUMBER. HIT 


THE C COMMAND AND FILL IN THE BLANKS USING THE SPACE BAR TO TAB 
YOU TO THE NEXT ENTRY FIELD. TRY DREAMING UP SOME OF YOUR OWN 
CHECK MNEMONICS. WHENEVER THE PROGRAM ASKS YOU IF THIS IS A NEW 
NAME, IT DID NOT FIND A MATCH WITH THE MNEMONIC YOU USED WITH ANY 
ALREADY IN THE NAME FILE. 


HIT THE S COMMAND TO SAVE THE FILE AWAY. THE PROGRAM WILL 
SHOW YOU THE FILE NAMES UNDER WHICH THE DATA WILL BE SAVED AWAY. 
YOU CAN OVERWRITE THE EXISTING FILE BY HITTING Y OR USE N IF YOu 


WANT TO SAVE THE DATA UNDER A NEW NAME, NOTICE THAT AFTER’ THE 
DATA IS SAVED AWAY, YOU ARE STILL IN THE PROGRAM WITH ALL THE 
DATA STILL THERE. IT IS WISE TO OCCASIONALLY USE THE S COMMAND 


DURING LONG EDITING SESSIONS TO SAVE AWAY THE CURRENT 
FILE..ESPECIALLY IF IT IS THUNDERING AND LIGHTNING OUTSIDE BECUZ 
ANY POWER GLITCH WILL THROW ALL THAT TYPING AWAY. IN CASE IT 
SHOULD , THE OLD FILE IS STILL ON THE DISK IN THE SAME CONDITION 
IT WAS WHEN YOU LAST CALLED IT UP OR AS IT WAS WHEN YOU LAST 
SAVED IT AWAY. 


TRY MAKING A’ FEW DEPOSITS---D COMMAND-- OR MAKE A_ FEW 
WITHDRAWALS FROM THE ACCOUNT WITH THE W COMMAND. USE THE V 
COMMAND TO GET THE BANK BALANCE BEFORE AND AFTER MAKING A 
WITHDRAWAL. WITHDRAWALS ARE IMMEDIATLEY DEDUCTED FROM THE’ BANK 
BALANCE. 


o HIT THE ? COMMAND. PLAY WITH THE PROGRAM AND GET A FEEL FOR 
IT. WHEN YOU ARE COMFORTABLE WITH IT, HIT THE @ COMMAND AND EXIT 
BACK TO CP/M. IT'S NOW TIME TO OPEN UP YOUR OWN FILE FOR’ REAL 
AND HAVE A BALL.... 


RALPH SHERMAN 

15 HYDAWAY DRIVE 
FOREST,VA 24551 
(804)-525-3167 


O> 


HOW 


II. 


Q> 


oe me fi . I0C 
TO USE THE INTEGER AND REAL-NUMBER CONVERSION ROUTINES 


REAL NUMBERS 


GLOBALS.RN$ contains the required global CONST, TYPE, VAR, and 
PROCEDURE definitions; PASZCODE.RN$ contains the executable code. 


Execute procedure RNSETUP at the start of your run, to initialize 
a table that is used for converting. From then on, call function 
INTTOSTR to convert the string representation of a number to a 
real (flag GRERROR=TRUE if the string is not valid); call RN$ 

to convert a real to a ready-to-print string. RN$ is capable of 
inserting punctuation (as for dollar-and-cents amounts), at your 
option. See the comments to these routines for details. 


INTEGERS 


GLOBALS.INT contains the required global CONST and TYPE definitions; 
PASZCODE.INT contains the executable code. 


Call INTTOSTR to convert an integer to a string, ready for display; 
Can be returned as a fixed-length field or with left padding 
omitted, at your option. See the comments to the routine for details. 


POLY-VU 
#PV 129 


K&M Company 
TORRANCE, CA 90503 


(S| | 


*) 


~CATALOG142 
ALMAZAR BAS 
ALMAZAR DOC 
AUSOPOLYBAS 
BACARRATBAS 
BANNER 280 
BLAKJACKBAS 
CRC - COM 
FOGASM ASM 
FOGINDEXPLI 
GOLDMINEBAS 
KPRO2-SWBAS 
MAKEADV BQS 
OZDOT BAS 
PACMAN ASM 
PACMAN DAT 
PACMAN OBJ 
SAMPADV AQV 
SAMPADV MQC 
SFA/SAV 0 

SFALDES 0 


SFALDES BAS 


More.. 
SFAMAIN BAS 
SFAMOVE 0 
SFAMOVE BAS 
SFAOBDESO 
SFAOBDESBAS 
SFARESP 0 
SFARESP BAS 
SFAVOC 0 
SFAVOC BAS 
SIG/M LIB 
SPACEWARBAS 
/USQ COM 
YKWw1l BAS 
YKW2 BAS 
36 file(s). 


10K 
2K 
2K 


SIGMUG vol. 


26 directory entries remaining. 


D>STAT O: 


Bytes Remaining On O: 4k 


D> 


142 


2/221 990 


TYPE O:-CATALOG. 142 


SIG/M 


index 


142.01 
142.02 
142.03 
142.04 
142.05 
142.06 
142.07 
142.08 
142.09 
142.10 
142.11 
142.12 
142.13 
142.14 
142.15 
142.16 
142.17 
142.18 
142.19 
142.20 
142.21 
142.22 
142.23 
142.24 
142.25 
142.26 
142.27 
142.28 
142.29 
142.30 
142.31 
142.32 


Volume 142 

-CATALOG.142 

CRC «COM 

SIG/M ~ LIB 

UsQ «COM 
name size 
ALMAZAR .BAS 2K 
ALMAZAR .DOC 2K 
SFA/SAV .0 1K 
SFALDES .0 9K 
SFALDES .BAS 7K 
SFAMAIN .BAS 15K 
SFAMOVE .0 2K 
SFAMOVE .BAS 2K 
SFAOBDES.0 2K 
SFAOBDES.BAS 2K 
SFARESP .0 13K 
SFARESP .BAS 5K 
SFAVOC .0 1K 
SFAVOC .BAS 1K 
AUSOPOLY.BAS 28K 
BACARRAT.BAS 4k 
BANNER’ .280 19K 
BLAKJACK.BAS 12K 
FOGASM .ASM 1K 
FOGINDEX.PLI 3K 
GOLDMINE.BAS 8K 
KPRO2-SW.BAS 10K 
MAKEADV .BOS 6K 
SAMPADV .AQV 8K 
SAMPADV .MQC 9K 
OZDOT -BAS 8K 
PACMAN’ .ASM 4K 
PACMAN’ .DAT 4k 
PACMAN’ .OBJ 16K 
SPACEWAR.BAS 11K 
YkKwl1 ~BAS 2K 
YKW2 -BAS 2K 


Games from Software Tools of Australia 
Extracted from recent releases 


contents of SIG/M Volume 142 


released 


October 7, 1983 


checksum program 
disk donation form 
unsqueeze .?Q? files 


74 


29 
D5 
A4 
34 
cg 
04 
F7 
3F 
30 
7A 
3E 
7A 
8C 
37 
26 
49 
61 
37 
05 
A4 
27 
F7 
93 
AO 
3C 
0B 
C4 
64 
A2 
00 
6B 
5F 


description 


Adventure game from Micro-80 


/ 


English/Australian of CPMUG game 
Osborne MBASIC game 

Prints banner to console & printer 
Osborne MBASIC game 

Calculates number of years of schooling 
required to read a document 

MBASIC game 

Spacewar game for Kaypro 2, MBASIC 
ad your own Adventure 

/ 

Osborne version of DOTS 


PACMAN game for cursor addressable 
terminals 


/ 

Osborne MBASIC game 

"My other computer is an IBM" for Osborne 
My other computer is an IBM" for ADM-31 


SIG-M Library -CATALOG Volume Number-142, 32 Files cataloged. 


Copyright (c) 1983 by Sig/M-Amateur Computer Group of New Jersey I 
P.0.Box 97, Iselin NJ, 08830-0097 USA mee Neen 


D> 


== 3 . SAMAZAR. DOC 
ALMAZAR I 
Original by Winston Llamas 
Published in 80 Micro, Anniversary edition 1983 


Almazar part 1 is a 72 room adventure. It was published in the 
1283 anniversary edition of 80 Micro, to run on a TRS 80 with 
Disc Basic. This version is translated to MBASIC 5.21. Since 
it was done on an Osborne with a 52 column screen, some of the 
layouts reflect the narrow format (some don't). 


- The suite consists of the following:- 


ALMAZAR.BAS The instructions plus chain to..... 
SFAMAIN.BAS The main programme 

SFAVOC.0 The vocabulary of instructions and objects 
SFAMOVE.0 The data file of moves 

SFALDES.0 The location descriptions 

SFAOBDES.0 The object description file 

SFARESP.0 The (computers) response file 


The data files were set up by file creation programs with the 
same Name as the data file, but with the Type of BAS. This 
allows the game to be changed at will for new locations, 
responses etc. 


If the game is SAVEd for later resumption, a file SFA/SAV.0 is 
created. 


Good Luck! 
Oo” LIDDELOW, Avalon, Australia 
Phone (02) 918-8436 


D> 


-CATALOG176 2K 
ABSTRACT176 2K 

CPM3LIB LBR 8K 

poms CRC COM 3K 
DRI-DATELBR 8K 

DU-V86 LBR 54K 

re) IF LBR 25K 
JOIN acc aK 

LU COM 19K 

SD-80  LBR 67K 

SIG/M LIB 2K 

UNSQ12 LBR 16K 

USO COM 2K 

USQ119 AQM 9K 


14 file(s). 
41 directory entries remaining. 


C>STAT O: 
Bytes Remaining On O: 
CTYPE ~CATALOG.176 
SIG/M Volume 176 
Sa 
2 ~CATALOG.176 
Es 
a 
ABSTRACT.176 
LU ~COM 
USQ -COM 
JOIN -ACG 
SIG/M -LIB 
oO CRC -~ COM 
index name 
176.01 CPM3LIB .LBR 
176.02 DRI-DATE.LBR 
176.03 DU-V86 .LBR 
176.04 IF -LBR 
176.05 SD-80 ~LBR 
176.06 UNSQ12 .LBR 
176.07 USQ119 .AQM 


K&M Company 
TORRANGE.CA 90503 


C> 


er) 


oO 


j 


20k 


Updated SD, CPM3 and Date Routines, 
Conditional Submit Files, 280 USQ. 


SIGMUG vol. 


176 


contents of SIG/M Volume 176 
released 


June 1, 1984 


Information about this disk 


Library utility 


Unsqueeze squeezed files 
Amateur Computer Group Application Form 
donation form 
checksum program 


size 


8K 
8K 
54K 
25K 
67K 
16K 
9K 


cre description 

OB D3 CPM3 routines 

CA 15 Calculates DRI dates 

66 E6 Updated Disk Utility 

3E 1A Conditional submit files 
3B 63 Updated Super Directory 
FC 96 280 unsqueeze 

39 2E USQ source code 


SIG-M Library -CATALOG Volume Number-176, 07 Files cataloged. 


P.O. Box 97, Iselin, NJ 08830 USA 


12/10\85 


Copyright (c) 1984 by Sig/M-Amateur Computer Group of New Jersey Inc. 


TYPE ABSTRACT.176 


LU (library utility) is found on SIG/M Volume 119. To use it for this 
disk, however, merely type LU. At the prompt type -O to open a file. Then type 
the name of the file (without the .LBR). To list the file (after it is open), 
type -L. To extract the files in the library type -e *.* (or the specifics of 
the file or files you want to extract). To close the file and extract from 
another file type -C. To exit after the file is closed, hit CONTROL C. There 
are many other things you can do with LU, so take a look at the original docu- 
mentation on 119. (The updated version, which appears on this disk, is found 
on Volume 156. . 


USQ is called by typing USQ *.* or the specifics of the file you want 
to unsqueze. (USQ will also give you a prompt and a help file is you just type. 
USQ. We have included the source code to USQ on this disk - just incase some- 
one would like to write a version of FIND that can handle a squeezed file. If 
someone does, we can probably put the CPMUG catalog back on Volume 0. 


DU-V86 appeared on SIG/M 152. However, the .LBR file on this disk con- 
tains the source code. 


C> 


TYPE CPM3LIB.DUOC 


October 17, 1983 
Jim Lopushinsky 


| Edmonton, Alberta 


CPM3LIB.REL is a library of subroutines that make use of CP/M 
Plus features. Included are routines to access the time and 
date, set and interogate elapsed time, inspect physical and 
logical character I/O devices, and set/get baud rates for serial 
I/O devices. 


This is just a start. In the future, I hope the library will be 
increased to include other CP/M Plus features. 


All routines (except BIOS) adhere to the Microsoft parameter 
passing conventions so that they may be called directly by any 
Microsoft language compiler (FORTRAN-80, COBOL-80, BASIC-80). 


To include any required modules, search CPM3LIB during the link 
step. 


er Direct bios call thru the BDOS using function 50. 
Input: Register D - Bios entry number (0-32). 
All other registers - As expected by the BIOS 
routine. 


Output: All registers returned as appropriate for the BIOS 


routine. 
TIMERS Initiate time counter 
Input: none. 


Output: none. All registers are preserved. The internal 
time counter is initialized to 0 and incremented 
every second. 

-Fortran calling convention: 


CALL TIMERS 


ITIMER Return number of seconds elapsed since the last call to 
TIMERS. 
Input: none. 


Output: Register HL - Number of seconds elapsed. 


ent 


seguister a =~ vopy Oo. Register L. 
Z flag set - TIMERS not yet called. 
All other registers are preserved. 


Fortran calling convention: 
° ITIME=ITIMER(0) 


Where: ITIME is either I*2 or I*1 variable. 
0 is a dummy parameter so that FORTRAN-80 will 
know that this is a function call. 


TIME Return date and time as 3 character strings. 


Input: Register HL points to 3 byte Day of Week field. 
Register DE points to 8 byte date field. 
Register BC points to 8 byte time field. 


Output: The 3 fields are set to the current time and date. 
Day of Week - Abbreviation of Weekday. 
Date field - MM/DD/YY. 
Time field - HH:MM:SS. 
All registers are destroyed. 


Fortran calling convention: 


CALL TIME (WKDAY,DATE, TIMEX) 


Where: WKDAY is a 3 byte array. 
re) DATE and TIMEX are 8 byte arrays. 
TIMEB Return date and time in binary format. 
Inputs: Register HL points to Day of Week word. 


Register DE points to 3 words for date. 
Register BC points to 3 words for time. 


Output: The 3 fields are set to current date and time. 
Weekday is in the range 0-6 (0=Monday). 
Date is in the order Month,Day,Year. 
Time is in the order Hour,Minute,Second. 
All registers are destroyed. 


Fortran calling convention: 
CALL TIMEB(IWKDAY,IDATE,ITIME) 


Where: IWKDAY is I*2 variable for Weekday. 
IDATE and ITIME are I*2 arrays of 3 for date and time. 


a Returns the pysical device number associated with the 
device name. 


Input: Register HL points to 6 character string which 4 
contains the device name. cpt 
L 


7u.puts 


Register HL contains the device number. 
Register A - copy of register L. 
All other registers are preserved. 


Error condition: If register HL = OFFFFH (-1) then the 


named device does not exist. 


Fortran calling convention: 


IDEV=IFNDEV (DEVNM) 


Where: IDEV is I*2 or I*1l variable for device number. 
DEVNM is 6 byte string containing the device name. 

Example: IDEV=IFNDEV('MODEM ') 
IDEV will contain the pysical device number 
associated with the name MODEM, or -l1 if MODEM 
could not be found. 

IBAUD Get or Set the baud rate for a pysical device. 

Input: Register HL points to the Baud rate word. 
If baud rate=0 then return current baud rate. 
Otherwise set the device to value at baud rate. 
Register DE points to device number byte. 

Output: Register HL contains the current baud rate of the 
requested device. 

Error condition: HL = 0 - Invalid baud rate or invalid 


device number or device does not support requested 
baud rate. 


Fortran calling convention: 


Where: 


Examples: 


IBD=IBAUD (IRATE, IDEVNO) 

IBD is I*2 variable containing returned baud rate. 
IRATE is I*2 variable which contains 0 for get or 
a baud rate for set. 


IDEVNO is I*2 or I*1 variable containing the 
device number. 


IBD=IBAUD (0,1) 


Returns the current baud rate of device l 
IBD=IBAUD (1200, 2) 


Sets the baud rate of device 2 to 1200 baud. 


IMXDEV Returns the maximum physical device number. 


Input: 
Output: 


none. 


Register L - Maximum device number. 


ayn 


Register A - Copy of Register L. 
Register H - 0 
All other registers are preserved. 
Fortran calling convention: 
° MAXDEV=IMXDEV (0) 


Where: MAXDEV is I*2 or I*1 variable that will contain 
the maximum physical device number. 


IGTMOD Returns a physical device Mode byte. 
Input: Register HL points to physical device number 
Output: Register L - Mode byte 
Register A - Copy of Register L. 
Register H - 0 
All other registers are preserved. 
Fortran calling convention: 


MODE=IGTMOD (IDEVNO) 


Where: IDEVNO is I*2 or I*1 physical device number. 
MODE is I*2 or I*1 variable that will contain the 
mode byte. 


The bits in the mode byte have the following 


r+) meanings: 


Bit 

0 Device may do input 

1 Device may do output 

2 Software selectable baud rates 

3 Device may use XON/XOFF protocol 
4 XON/XOFF protocol enabled 

5-7 Reserved for future use 


IGTDEV Return current logical to physical device assignment 
vector. 
Input: Register HL points to logical device number. 


CP/M 3 has five logical devices: 


0 CONIN Console input 
1 CONOUT Console output 
2 AUXIN Auxiliary input 
3 AUXOUT Auxiliary output 
4 LSTOUT List output 
o Output: Register HL - current physical assignment vector 


for the requested logical device. Bits are set 
corresponding to physical devices from left to 
right (bit 15 = device 0, bit 0 = device 15). 

All other registers (except PSW) are preserved. 


~. oa) 6eonditions: 


ISTDEV 


Cc> 


Register HL = OFFFFH (-1) - Invalid logical device 
number. 


Fortran calling convention: 


Where: 


Input: 


Output: 


IVEC=IGTDEV (DEVNO) 


DEVNO is I*2 or I*1 logical device number. 
IVEC is I*2 variable for assignment vector. 


Set logical to physical device assignment vector. 


Register HL points to logical device number. 
Register DE points to new physical assignment 
vector. 


none. All registers except PSW and HL are 
preserved. 


Error condition: 


Register HL = OFFFFH (1-) Invalid logical device 
number. 


Fortran calling convention: 


Where: 


IERR=ISTDEV (DEVNO,IVEC) 


DEVNO is I*2 or I*1 logical device number. 
IVEC is I*2 assignment vector. 
IERR is I*2 or I*1 error return code, 


cr*3 


TYPE DRI-DATE.DOC 
El Paso Tx - 10/26/83 


Now, how did Digital Research ever get the idea of using "the number of 
days since 01/01/78" for their MP/M and CP/M plus system date format? 
Surely, they must have had a reason and the prime consideration, I assume, 
was space. Space is what is at a prime in disk directories, so they 
decided to make the date as small as possible. 


It just so happens you can get 179 years into 16 bits. That plus the fact 
that microprocessors, CP/M and 8- and 16-bit stuff will probably not be 
with us anymore in 20-30 years, assures that the format doesn't get 
obsolete. 


Unfortunately, the format brings with it the agony of conversions. 
Enter myself. Now, you have someone to thank (Cor curse) for taking the 
conversion work off your fingers. I have written two routines which I 
call DATE and UNDATE. They can be assembled and linked into any program 
using RMAC/LINK or M80/L80 and provide conversion functions for you. 

I decided to keep it simple and not provide Microsoft FORTRAN etc. 
compatibility, but rather gear it towards the assembly language 
Programmer. Since most existing clock routines already are written to 
Provide ASCII output, and since the UNDATE function will probably 
quite often be used to convert keyboard input data, no provision was 
made to convert a binary or packed BCD date. 


This is a description of the two routines, their actions and parameters: 


DATE 


The DATE routine is to be called at it's entry point, @DCVRT, with 

the date to be converted in HL in Digital Research format. The DATE 
routine expects a global symbol, @DCFLD, to be the pointer to the first 
byte of an ASCII date field. On exit, that date field will be filled 

with the date corresponding to the input value in ASCII. A typical 

field, which is usually declared in the main module would look like this: 


@DCFLD: DB ' £ ff $ 


The field can be totally empty, or hold a previous date. No error checking 
is done and only bytes 0,1,3,4,6, and 7 are written. If delimiters are 
needed, they should be in place like above. If the field is terminated 

by a dollar sign, it can be printed under CP/M with: 

LXI D,@DCFLD ! MVI C,9 ! CALL 5 


UNDATE 


The UNDATE routine is to be called at it's entry point, @UDCVT. The 
contents of the registers are irrelevant. A date field structure 
exactly as described for the DATE routine above should be present 

and declared with global symbol @DCFLD as it's first byte. UNDATE 

will convert the ASCII date, which must be stored in MM/DD/YY format, 
to Digital Research format and return the resulting 16-bit value in HL. 
NOTE: The date is checked for the following format errors: 


Year 77 aor earlier 
Month over 20 
Day over 40 
Non-numeric ASCII character 
; ’ : A 
and the routine will abort with the CARRY flag set and al! registers A 


holding undefined values. If none of the above format errors are 
oa. ad. PBRRY --4It ve RESET ond :s wt Kk he wwe ¥ oS 


the rudimentary error checking, the CALLING PROGRAM is responsible 
for a valid date field! 


Both routines can probably be improved a bit, especially the DATE 
routine is a bit slow. 


YOU. the writer of the main module using these routines, are 
responsible for properly initializing the date field. 


I chose to use simple names, such as DATE and UNDATE to identify 
the source modules. In order to avoid possible symbol conflicts, 
I decided to be a Jot more cryptic with the name selection for 
the entry points and the parameter. 

Again, the entry point for DATE is @DCVRT, and the entry point 
for UNDATE is @UDCVT, while the ASCII date field is @DCFLD. 


You might, if you intend to do a lot of programming, put these 
routines into some form of library, possible append them to 
the SYSLIB library (If Rick Conn doesn't mind...) 


Have fun converting dates! 


P.S. These routines work. I write a small program which started at day 
1 and counted up, displaying the date first in DRI format, then in 
ASCII, and then converted the ASCII back to DRI format, and in all 
cases it translated correctly up to 12/31/99. Hardest part was 
convincing the DATE routine that there is no MM/OO/YY... 


D> 


TYPE DU-V86.DOC 


DU-V86.DOC 


By Ward Christensen (revised 10/18/83) 
additional notes by Ron Fowler, Irv Hoff, and Jeffrey Nonken 


This version of DU is compatible with CP/M 1.4, 2.x and 3.x and does 
not require alteration for various hardware configurations. It ad- 
justs itself automatically to the correct number of Sectors, tracks, 
directory size, etc. 


see ee ee ee we 


INDEX 
1.0 INSTALLATION: 
2.0 USE: 
2.1 COMMANDS, BY FUNCTION 
2.2 ALPHABETIC COMMAND SUMMARY 
3.0 NOTES 
4.0 INTERPRETATING DIRECTORY DATA 
4.1 SINGLE DENSITY 
4.2 DOUBLE DENSITY 


1.0 INSTALLATION: 

Because of the automatic adaption feature, no conditional assem- 
bly options are included. The only alteration that needs to be done is 
to use DDT to set the byte at 103H for your clock speed. Use O for 2MHz, 


1 for 4MHz, 2 for 6MHz. (This only affects the 'Z' SLEEP command.) 


2.0 USE: 
An initial command string may optionally be placed as an operand 
of the original 'DU' command, i.e.: 


A>DU GO;D;G2;=OK<D><A><1A>;D 


for example, if you want to only map the disk, and then exit: 


A>DUU M;X 


Once 'DU' is running, it expects single-letter commands much 
like 'SID' OR 'DDT'. For ease of use, multiple commands may be placed 
on one line, separated by ";". In addition, a given command or string 
of commands may be repeated —- either indefinitely (until *C is pressed) 
or a given number of times. 


To avoid an accidental “*C from dropping out of 'DU', only an ex- 


plicit "X" command will exit 'Du'. 
2.1 COMMANDS, BY FUNCTION 
HELP: 
? displays the help guide 
POSITIONING: 


Gnn hy allneaoti in ina. 


I/o: 


DISPLAYING: 


Mxx 
Vnn 


CHANGING: 


CAnn, VAL 
CHnn, VAL 
Unn 


SEARCHING: 


MISC: 


1 nm 
rw 


=Abc 


FNAME 


Znn 


by sector 
by track 
going ahead nn sectors 
going back nn sectors 


puts current sector "away" into a buffer 
recalls previously saved sector 
writes "yanked" sectors to a file 
(see "saving sequential memory" in notes below) 
reads sector 
writes sector 
"yanks" current sector into sequential memory 


shows disk parameters 

dump sector in ASCII 

dump the sector (hex + ASCII) 

shows current group, track, sector 

dump sector in hex 

maps the disk -- where the files are located 
map starting at group xx 

views (like CP/M type) nn sectors 


change data in ASCII (with <xx> escape to hex) 
change data in hex 
change user to nn 


scan for Abc (CIN ASCII) from current sector on (very 
slow, allow up to 15 minutes to scan an entire disk. 
Either finds the answer or says: "out of bounds", 

find a file in the directory 

find next occurrence (extent) of same name 


toggles the map display to show/not show erased files 

repeat previous command nn times (repeats indefinitely 
if nn omitted) 

boot nn sectors per track 

log in disk X 

printer toggle 

before a command does it 'quietly' 

exit to CP/M 

sleep [nn tenths of a second) to allow viewing data 
before it scrolls off 


ALPHABETIC COMMAND SUMMARY 


PRINTS THE DISK PARAMETERS 

Advance 1 sector (if below track 2, this advances to 
next numerical, if 2 or more, advances based on 
CP/M's normal sector scrambling algorithm, i.e., 
allows + to the next logical sector of the file. 


backs up 1 logical sector 


NOTE: + and - may take an amount: For example, 
+15 advances 15 sectors 
repeats entire command -- defaults to "forever" a/ 
nn may be 2 TO 655385 vu 


toggles the map display to show/not show erased files. 
Wha. ehn-einn go re: f° oe VEL 2? we Beigew a ‘ at 


duplicates a block in another file. It may not be 
possible to restore this program without errors. If 
there are no '*' jin this complete file, it can be 
correctly restored. 

< saves current sector in a 'save' buffer 

=Abc ASCII search, starting at current sector. <xx> hex 
may be imbedded or used alone. To find: "IN OFEH" 
use: =<DB><FE> (Ignores bit 7 unless using <xx>.]) 
Since ";" is a command delimiter, you have to use 
<3B> to search for a ";". Also, since "<" js a hex 
escape character, use << to mean a single "<", 


NOTE: This is a very slow routine. It can take 15 
minutes or longer to search an entire double- 
density double-sided disk so be patient. It 
either finds the string or says: "OUT OF 


BOUNDS", 
> gets saved buffer. < and > maybe be used to move 
a sector to another place. 
4 displays the help guide 
A dump sector (ASCII only) 
Bnn boot nn sectors per track —- not all disks have 26. 


CHADDR,VAL,VAL,VAL... change hex values in sector 
CAADDR,CHAR STRING... change ASCII calues in sector 
NOTE: <xx> may be hex imbedded in the ASCII 
string: CA00,QK<0D><OA><1A> 
----> W writes changes to disk 
note that the 'C' command echoes the over— 
laid data for verification. 


CHADDR-ADDR, BYTE repeats a change 

CAADDR-ADDR, BYTE repeats a change 

D dump sector (hex + ASCII) 

FNAME print directory for file "NAME", then positions to 
its directory sector. 

F find next occurrence of name in directory 

Gnn position to group nn and read 

G shows current position 

H dump sector, hex only 

Kdu:filename.ext Save a file from "yanked" sectors. 


drive, user are optional. Resets "yank" address. 
see "saving sequential memory" in notes below. 


L re-logs in the current disk —- you may pull out a 
disk, put in a new one, and "L" just to log it in. 
{see "logging in disk" in notes below) 

LX fogs in disk 'X', such as: LB, LC, LA, etc. 

M dumps a map of the group allocations for files 

Mn shows which file is allocated to group "N" 

N resets CP/M via BDOS —- this may make it possible under 


some implementations of CP/M to change the disk 
format, i.e., density, sides, etc. 


P toggles the printer on/off 
Q quiet —- preceedintg any command, suppresses CRT output 
R reads into memory the sector currently positioned at, 
NOTE: 'R' (read) is implicit in the G, +, and — 
commands but NOT in the 'S' and 'T' commands 
Snn position to sector nn, and read 
TNN seek to track nn (no read) 
Ux logs user 'x!' for next 'F' command 
V views the current sector -- assumes ASCII data 
Vnn views nn sectors 
W writes the current sector to disk 
NOTE: may NOT be used after an 'F' command as 
CP/M was used to find file in the directory 
X exit back to CP/M (must press return). “*C was too 


sasy to hit over modem lines -- requires two bytes: 
[X CRI ta ivi 


a 


Y "yank" the current sector into sequential memory 
(starts at 3000H, increments for each yank) 


Zz sleep -- causes the porgram to pause -—- such as to look 
at a dump. Z is 1 second 
Znn nn tenths of a second Z50 = 5 seconds 


3.0 NOTES 


* Multiple commands: May be seperated by ";" 


EXAMPLE: The following commands will erase the B: disk directory to all 
ES's: 


LB log in B: drive 

GO position to directory 

CHO-7F,E5 fill with E5 

< save the sector 

>;W3+;716 restore, write, next, repeat 16 


—--~- this could be shortened to: 


LB;GO;CHO-7F,E5;< 
>3W3+3/716 


* DUMP COMMANDS: AII dump commands [(D, A, H) may be optionally followed 
by a starting and ending address: 


DO,7F the same as just 'D! 
D3,5 
A20,3F 


* LOGGING IN DISK: If you have a disk with a 'blown directory', try 
logging in a good disk of the same density, then put in the 'blown' disk 
without logging it in. You are opening yourself to possible problems 
because of the buffering of physical sectors in the 'BIOS'. The best 
technique, (but not guaranteed), would be to seek to the unused inner 
tracks of the first disk, do the read, then change disks. That way, if 
it write anything, you won't have destroyed anything -- assuming the 
disk is not completely full. Another technique (assuming the second 
disk does not contain a CP/M system, would be to seek to track 1, do the 
read there, then change disks to the blown one. 


* SAVING SEQUENTIAL MEMORY: 
Since CP/M v 3.0 does not have a SAVE function, one has been added. 
Syntax is: 
Kdu:filename.ext 
111 | +-- file extension (0-3 characters) 
Hil $eSSeSaS= file name (1-8 characters) 
[ ReSSe=SSSSsheSeS user # (or none) 
a aa drive designation (A-P or none) 
aaa a a aa DU command 


Drive and user may be omitted. If so, omit the colon as well. Drive 
must be specified if the user is. If the user # is omitted, the current 
user is used. If the drive is omitted, the currant CP/M default drive 
js used. 


~ 


"his function saves the current contents of sequential memory into a disk 


File. The contents of sequential memory are determined by the ‘yank! 
function, and the pointer of that function is used here. If nothing has 
een yanked, you get an error. Once the file has been saved, the ‘yank! 


Pointer is re-initialized to its original value (3000H). Control is re- 
turned to DU. 


0 INTERPRETATING DIRECTORY DATA 
1 SINGLE DENSITY 


The following explains the format of a CP/M directory entry as 
Shown by 'DU', using either the 'F' (find file) command, or just doing 
'D' (dump) of the directory sectors, which are located in groups O and 1 
on a single-density disk. 


SAMPLE RESULT OF 'FSID.COM' COMMAND: 


40 00534944 20202020 20434F4D O000008A *.SID COM...:* 
50 33343536 3738393A 00000000 00000000 *3456789:..... «mat 
FIRST LINE - 

40 00534944 20202020 20434F4D 0000003A *.SID COM...:* 
I} odd | lI | | 

I] |l*---hex file name/type--* [| II “file name* 
| I | in ASCII 

| extent—** I 

en 11 

Ilo file size in sectors—*~* 

Il o4 

[| **-00 = file active other values (E.G 03) = user # 

| ES = file erased 


—-displacement of line in directory sector 


SECOND LINE - 


50 33343536 3738393A 00000000 O0000000 *3456789:........ * 
| l | 
| l *- allocation groups 
Sa allocation group numbers-—---—~* (just happened to 
be printable) 


2 DOUBLE DENSITY 


The following is a samp!te of 'FSID.COM' running on a double- 
density system: 


:FSID.COM 

00 00534944 20202020 20434F4p o000003A *.SID COM...:* 
40 38003800 8A003B00 O0000000 OOOOD000 *8.3. 
g=0000:00, T=2, S=1, PS=0 


The primary difference is that the groups now occupy 2 bytes, f 
j.e., 38 00" "39 00" ... this follows the Intel and CP/M convention of we 
putting 16-bit values high-byte-first. This it means group 00388, 0039 


Note that in double-density, each group stood for 2k not 1K, 
So there were half as many groups for the same file. 


Be very careful when patching a directory under double-density. 
For exmaple: 


CH10,38,39,3A,3B... 


This might try to access group 3938 with resultant angry noise 


from the disk stepper as it attempts to find where it should go for the 
data. 


D> 
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IF-ELSE-ENDIF Documentation 
For Version 1.0 


Written by: Marc C. Brooks 
1124 Redman Rd. 
St. Louis, MO 63043 
(314) 741-4465 (voice) 


INTRODUCTION 


IF and its companion programs (ELSE, ENDIF and GOTO) are 
direct out-growths of David Kirkland's version of the SKIPIF 
program as printed in Dr. Dobb's Journal. They share much code 
with the SKIPIF and I am eternally grateful for Mr. Kirkland's 
inspiration. 


IF is designed to allow conditional execution of statements 
within a CP/M submit file. Because of the method used to skip 
re) statements in the submit file, IF cannot be used in CP/M+t. For 
all other versions of CP/M-80, though, IF lends the versitility 
of the standard structured programming construct IF-ELSE-ENDIF. 
GOTO is a companion program whose need was discovered while using 
IF. It allows forward (backward is impossible) jumps in the 
submit to labeled points. 


IF, ELSE, and GOTO, when execute from the CCP but not within 
a submit file, will explain their use and_ syntax. This 
document's main purpose is to give examples in the use of these 
four programs. 
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I. IF Summary 


IF is the main program for this package. It makes decisions 
on which logical branch of the submit should be taken. If the 
condition specified by the IF command is true, all commands up to 
the matching ELSE or ENDIF will be executed. If an ELSE is 
encountered while executing command, to following commands will 
be skipped until the matching ENDIF is encountered. If the 
condition is false, commands up to and including the matching 
ELSE (if it exists) or ENDIF are skipped. IF has five commands 
which decide the fate of the submit. They are: 


Almbig] fn If the fn which appears on the command line 
is an ambiguous file reference (i.e. one 
with an * or ? in it) the condition is true. 


E[xists] fn If the file referenced by the fn given on the 
command line exists, the condition is true. 


Mlissing] fn If the file referenced by the fn given on the 
command line can not be found, the condition 
is true. 


N[full] (fn) If the fn itself is missing from the command 
line, the condition is true. Note that the 
parathesis '()' do NOT appear in actual use. 


Zlero] fn If the file referenced by the fn given on the 
command line can not be found or is of zero 
length, the condition is true. 


Note that only the first character of the keyword (A for Ambig or 
whatever is significant. All other characters of the first 
parameter are ignored. The second parameter MUST exist for all 
command except with the Null command. If an invalid keyword is 
given or the fn is missing when needed, IF will give an _ error 
message and skip to the matching ENDIF statement. If any other 
error occurs, IF will abort the submit. 


II. ELSE Summary 


ELSE is a program that automatically skips all commands up 
to and includign the matching IF. It is skipped when the 
preceeding IF is false, so it will only be executed when the 
preceeding IF is true. In that case, ELSE should skip the ELSE 
clause up to the ENDIF marker. For that reason, ELSE always 
skips to the matching ENDIF. IF-ELSE-ENDIF groups may be nested 
to any depth and ELSE will skip to its ENDIF. If ELSE is 
executed by the CCP outside a submit, it will explain its use and 
exit. If it runs into any errors, it will terminate the submit. 
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III. ENDIF Summary 


ENDIF is just a place-marker for IF and ELSE, but it must be 
an executable program because it will be loaded every time the 
ELSE clause of an IF is executed. In its current form, it just 
returns to the CCP. 


IV. GOTO Summary 


GOTO is used to provide unconditional skipping of steps in a 
submit procedure. To use it, just put GOTO 'label' in the submit 
program where desired. Somewhere later in the submit, place a 
label as a comment line. Labels take the form of any string of 
non-whitespace characters terminated by the end of the line or a 
whitespace character. Whitespace characters are any characters 
lower in the ASCII collating sequence than '!' (i.e. space, tab, 
etc.) Some examples of GOTO are: 


GOTO END-OF-COMPILE 
GOTO SKIP terminate the rest of the submit 


GOTO 1200 


In the second example, the text following the word 'SKIP' is 
all ignored. The corresponding to the above GOTO statements 
might look like this: 


;END-OF-COMPILE All the passes of the compile are done 
7 SKIP 
71200 


Once again, in the first example, the text following the 


label is completely ignored. Also, due to limitations within the 
CCP, the case of the label characters is not significant. 
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re) V. EXAMPLES 


Example 1. pp -o edit.tml edit.c 
pl -o edit.tm2 edit.tml 
era edit.tml 
IF ZERO EDIT.TM2 did the pl passed find errors ? 
era edit.tm2 
GOTO LIST-FILE 


ELSE 
p280 -o edit.s edit.tm2 
era edit.tm2 
as80 edit.s 
era edit.s 
link ~o edit.com edit.o 
ENDIF 
IF ZERO EDIT.COM did the link fail ? 
;LIST-FILE + list the source file 
list edit.c 
ENDIF 
Example 2: IF Null $1 
;ERROR -- You must supply a file to be compiled 
ELSE 
IF Ambig $1 
7ERROR -- You may not use ambiguous file names 
ELSE 


IF Missing $l.bas 
;ERROR -- I can't find $1 


© 


ELSE 

+ all okay so lets compile the program 

CB80 $l.bas $3 

LK80 $1 my.lib 

IF Null $2 

ELSE 

list $l.bas 

ENDIF 
ENDIF 
ENDIF ; these two ENDIF's aren't necessary, 
ENDIF ; just good programming. 
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YPE SD-7S9A.DOC 
v79A 03/17/84 
The SD Super Directory Program 


This documentation file concerns SD-79A.ASM. This is a signifi- 
Cant upgrade of the standard "super-directory" program that most RCP/M 
Systems are now using as their "DIR" executor. 


The most significant improvement is the support of the DU: form for 
drive-spec, similar to that used by ZCPR2 and its various utilities. 
This is concurrent with the $U option. The filename of the file for the 
$F option has been altered to SD.DIR, as it was originally. Other op- 
tions such as multi-drive search remain as before. Now, in place of the 
SU option, you may specify the Drive/User with the filename, such as: 

SD A1:*,.*, SD 1:*.*, SD B:FN.FT, SD B4:FN.FT $AD, etc. You may still 
use the $U option if desired, although it seems the DU: form is a much 
easier and more logical method. 


Files may be shown in vertical or horizontal listings, although 
this must be set when the program is assembled for a particular system. 


SD-739A has support for .LBR files, fan 'L' option to list their 
member files); and support for the NZCPR/ZCPR2 "WHEEL" byte option. 
(SD-79A.COM set up for ZCPR2 use with WHEEL at 3EH.) Size of library 

Member files are shown in 'k!. 


The basic operation of SD is as in previous releases. You merely 
type "SD", followed by an optional ambiguous or nonambiguous filename 
(as you would with the CCP directory command). Omitting the filename 
(i.e., "SD <cr>"), will be interpreted as "SD *.*", Similarly, "SD A:" 
would imply "SD A:*.*" and "SD B:" would imply "SD B:*.*", 


In addition to the filename option, up to 11 command line options 
may be specified. Option fields are preceded by a single dollar sign 
as with most Digital Research programs such as MAC, and may be essen- 
tially free-form in format. Example: SD B:$ADnUOfpS. Spaces within 
the option field are insignificant i.e., "$ SADN UOFP" is equivalent to 
"$ S ADN UO F P"). The only exception concerns the "USER" option 
which will be explained later. 


Users should also be aware of two restrictions on the command line 
format. SD scans the entire command line for a dollar sign preceded by 
at least 1 blank to delimit the beginning of the option field. Forthis 
reason, invoking SD with a command line such as: "SD $ $AR" is illegal, 
since SD will consider the first dollar sign to be the option field de- 
limiter. If you need to specify a filename whose first character is a 
dollar sign precede it with a drive code as in "SD A:$ $AR", In this 
instance, SD will consider the first dollar sign insignificant as it is 
not preceded by a blank. 


Starting with SD-75 there is an assembly time option which, if set, 
allows the use of options without requiring the filename to be preceded 
with a drive code so long as you wish to look on the default drive. 


You give up the ability to specifically search for a filename whose 
name begins with a '$'. However, such files will be listed, along with 
others, if the command line "SD $CU3" (or any other options) were speci- 
fied. The "COM" file is configured with this option set. Setting the 
option to 'NO' and reassembling will cause operation to revert to that 
of previous versions (see paragraph above). 


The second restriction is that command line options may be specified 


once and only once per invocation. That is, "SD A:$SDS" would be il- BY 
big ss e nee tie 'G!I auntie: “ae er18eRtif op os 1g Tete: Ob pdms? 6 7 : f 


to the fact that options can be made into defaults at assembly time. 
Note that if an option is made default, with zero as option flag, it 
Cannot be specified without generation an error message. The eleven 
Cognized options: 


"S" — system option: System files will be included in the 
output rather than being suppressed. 


"F" — file option: The directory output will be echoed to 
a disk file named "SD.DIR" on the DEFAULT drive. 
If this name already exists then the directory output 
will be APPENDED to the end of the file. "SD.DIR" 


will otherwise start as a new file. The append fea- 
ture allows you to build up one massive file on the de- 
fault drive containing the directories of all of your 


disks, without having to concantenate a swarm of indi- 
vidual directory files. If you plan to use this fea- 
ture often,it will be simpler for you to have a dedi- 

cated version oan your MAST.CAT disk with AUTOR set 
'YES'. The advantage of this is that you can work thru 
a pile of disks without having to CTL-C or specify the 
'R' option every time you SD a new disk. Failing to do 


this will result in the allocation vector being inval-—- 
id, and FREE size will be wrong. 
"U" - user option: Allows the specification of the user num- 


ber for the directory of the form "Uxx" where the user 
# is greater than O, but not greater than a specified 
value not to exceed 15. The user option specification 
will be illegal if the user # is out of range, omitted, 
or if 'U' is specified on a pre-CP/M 2 system. Since 
the user option requires a parameter (i.e., the user 
number), the user number must immediately follow the 'U' 
option on the command field. That is, "U1" is legal, 
but "U 1" jis not. In this respect, the 'U' option 
differs from the other options in that embedded spaces 
ARE significant. 


"A" — all users: Causes SD to display directories of all 
user areas starting at the user area specified in the 
'U' option or, if the 'U' option is omitted, user area 
O and continuing up through the MAXUSR value from the 
LODRV-HIDRV table. (If ZPR2/WHLUSR=TRUE and the WHEEL 
byte set, O-MXZUSR.) 


"L" -— LBR list option: Allows for listing of ".LBR" file 
members. ".LBR" file members are shown followed by 
their length in 'k'. The total length of the entire 
library is also shown. 


"vy" — If included, SD version number is displayed. 


"Cc" -— If included, clear’ screen performed before directory 
information is displayed. 


"N" — no page option: Unconditionally disables the page 
pause option. Useful when running SD in the 'F! and/or 
‘A’ modes when you don't want the page prompt slowing 
you down. SD-7S9A will not put the page-pause prompt 
into the output file or to Printer if either enabled. 


up" — printer option: Forces all console output to be echoed 
to the CP/M list device, with the most significant bit 
set to O. 
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on-line starting with the disk drive specified or im- 
Plied with the command line filename. For example, 

"SD B:$D" will result in SD searching all! drives begin-— 
ning with drive B. "SD $D" will result in SD searching 
all drives automatically beginning with the A drive, 
regardless what drive you started on. 


"R" — Reset disk system: A disk system reset is done before 
directory information is accumulated. 


If an unrecognized option Cor illegal user option specification) is 


detected, then the command line will be played back to the console up to 
the point where the error was detected. However, if the REPERR option 
is disabled, then SD will keep its mouth shut and ignore everything on 


the command line past the illegal field. In this situation, an illegal- 
ly specified user number would default back to the current user number. 
The option of DISABLING error reporting was included primarily for sys- 
tems with hidden doors and secret passageways. Shooting off rockets and 
clanging bells everytime a twit starts "experimenting" just calls atten- 
tion to the fact that there really IS something behind that hollow-— 
sounding wall after all. 


As an added convenience, it is possible to "hard-wire" some or all 
of the command line options. For example, if you want SD to ALWAYS list 
system files, you can do that. For details, see the comments preceding 
the option field Jookup table in the assembler source file. 


Finally, if the all-disk and/or all-user options are enabled, it may 
be desirable to restrict searches. To facilitate this, a table is in- 
cluded in SD (beginning at label "LODRV" and continuing through "HIDRV"). 
The table consists of a single byte for each drive to be searched begin- 
ning with 'A'. Each byte may be in the range of O-15 mod 15 and defines 
the highest user number that SD will search for that particular drive. 
The highest drive number to search is defined by the length of the table. 
If four DBs are present between LODRV and HIDRV, then drives A-D can be 
searched. The source file includes the LODRV-HIDRV table in its maximum 
configuration for 16 drives. However, delete DBs referencing drives that 
aren't available on your system. Although SD will intercept attempts toa 
search non-existant drives, there really isn't any point in allowing SD 
to always search drive C when you only have 2 logical drives; and de- 
pending on how your BIOS is constructed and how long it monkeys around 
before advising the BDOS of the select error, it could save some time. 


You don't really have to be running NZCPR or ZCPR2 to use the wheel 
byte feature, just get the WHEEL program and add cade to BYE to make 
sure WHEEL byte is cleared when a remote user logs on, (before entering 
CP/M). 

- Written by Kim Levitt 
- Updated by Irv Hoff 
- Further updates by Dennis Vallianos 
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TYPE UNSQ12.ASM .:» (ABRIDGED FILE, OPENING COMMENTS ONLY) 
UNSQ.ASM ver. 1.2% 
Copyright (C) 1983 
by Gail Zacharias 
345 Harvard St., Apt. 2A 
Cambridge, MA 02138 
Phone (617) 876-3035 


A Z80 assembly language version of USQ. 
Originally written in March 1983 and revised in April 1988. 


Commands: 
UNSQ inputfile [ outputdrive: ] 
Unsqueezes files created with SQ. Input filename may be ambiguous. 
Any matching non-SQ files will be ignored. 


UNSQ inputfile T 
Unsqueezes files and types them out on the console. 
“S pauses output, “0 toggles output on/off. 


In either form, “C aborts, “X skips to next file. 


Converted to assemble on CP/M with MAC and Z80.LIB 
April 1983 by Keith Petersen, W8SDZ 


11/07/83 Renamed from US@ to UNSQ@ to avoid confusion with 
other programs of the same name. Released to public— 
domain by permission of Gail Zacharias. KBP 
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SIGMUG vol. 194 10/8/85 


-CATALOG194 ° 2K 

CRC COM 3K “3g 
FILLS BAS — 1K | 
GRAF FQ 23K | 
GRAFl1 PAS 17K } 
GRAF2 PAS 19K 

GRAPH BAS 9K 2% | 
HANDPLOTBAS 22K 

JOIN ACG 4K | 
PLOT33 AQM 44K | 
PLOT33 DQC. 38K 

PLOTCITOCOM 4K 

PLOTEP COM 4K 

PLOTOKI COM 4K 

SIG-M LIB 2K 

TEST BAS 2K 

TEST PAS 3K 

UPLOAD BAS ~ 10K 

USO COM 2K 


19 file(s). 
37 directory entries remaining. 
C>STAT O: 


Bytes Remaining On O: 28k 
TYPE -CATALOG.194 
SIG/M Volume 194 High Resolution Graphics Printing System 
from the Air Force Institute of Technology 


-CATALOG.194 contents of SIG/M Volume 194 


released October 5, 1984 
JOIN ACG Amateur Computer Group Application Form 
SIG-M LIB donation form 
uUSsQ -COM unsqueeze squeezed files 
CRC -COM checksum program - type 'CRC' to check disk 
index name size cre description 


194.01 PLOT33  .AQM 44K FC 55 Dot matrix graphics driver 
194.02 PLOTCITO.COM 4k DD A3 Assembled files for CITOH, EPSON 


3 _ 194.03 PLOTEP .COM 4K Cl £E6 and OKIDATA printers. IDS, Apple 
5 194.04 PLOTOKI .COM 4K 26 EB and others use .ASM file 

Es 194.05 PLOT33 .DQC 38K 3C 2D} Documentation 

6° 194.06 FILLS -BAS 1K 9D A2 MBASIC demo of stipple patterns 
Oo] 194.07 GRAF -FQ 23K F9 97  FORTRAN-80 plot package 

S& 194.08 GRAFl1 .PAS 17K 77 9B ‘Turbo Pascal low level routines 
ool 194.09 GRAF2 -PAS 19K BO FF Turbo Pascal graph drawing routines 
“Fe 194.10 GRAPH  .BAS 9K B5 4F  MBASIC plot package 


a 


194.11 HANDPLOT.BAS 22K 93 B2 Demonstration program 

194.12 TEST -BAS 2K D6 EF MBASIC example program 

194.13 TEST -PAS 3K 41 CD Turbo Pascal example program 

194.14 UPLOAD .BAS 10K DO 93 MBASIC demo-stipple pattern vedefinktion 
SIG-M Library -CATALOG Volume Number- 194, 14 Files cataloged. 


ang | 


aT 


Copyright (c) 1984 by Sig/M-Amateur Computer Group of New Jersey Inc. 
P. ke Box bre Aeelany I NJ GRD OBA 
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PART 1 USER'S GUIDE 


GENERAL INFORMATION 


This collection of programs contains a graphics system 
that can produce high resolution graphics on dot matrix 
printers and other graphic devices. This system consists of 
three parts: 


- high tevel tanguage subprograms that you include in’ your 
application programs, 


- a disk file created by the application program which is 
used to describe the pictures to be printed, 


- and low level device drivers that read the file and 
produce the pictures on whatever sort of hardware you are 
using. 


The application program "plots" by writing simpte plot commands 
to a disk file, which is tater read and printed by the tow 
level driver. This file is the key to the whole system, 
because it makes the application program independent of the 
plotting device and vice versa. It also makes it poassible to 
plot pictures that were created on different computers or to 
plot the same picture on different types of hardware, such as 
CRT's and printers. 


The system contained in this collection has high level 
subprogram libraries written in BASIC (GRAPH.BAS), Turbo 
Pascal (GRAF1.PAS and GRAF2.PAS), and FORTRAN (GRAF.FOR). AC 
library is being debugged. It contains one assembly language 
device driver, PLOT33.ASM, which will plot on a variety of dot 
matrix printers. These printers include the Epson MX-80 etc., 
CItoh Prowriter, Okidata 92, NEC, Gemini-10, Apple Dot Matrix, 
and IDS printers. PLOT33 lets you treat your printer as if it 


were a plotter capable of true vector graphics. Al! future 
versions of PLOT (3.x) will support the same basic file format 
and will be compatible with each other. 


This documentation describes how to get PLOT33 installed, 
specifies the format for the disk file of plotting vectors 


(".VEC" files), and gives an overview of the high level 
language packages. You will probably want to briefly skim over 
the descriptions below and go right to the Installation 
section. If you intend to mainly use the programs and 


subprogram libraries provided, the exact details of the format 
of the commands in the file are not important. 
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Capabilities 


PLOT's command set includes instructions for device 
independent graphics and commands’ that provide access to the 
unique capabilities of specific devices. The device independent 
commands are patterned after a pen plotter's characteristics, 
with a rudimentary capability for filling areas on raster scan 
devices. These device independent commands include’ the 
capability to move to a point without plotting, to plot points 
and straight line segments, to change the current color, and 
fill in a trapezoidal area. More complex areas can be 
decomposed into simpler regions for filling. 


The device dependent commands include the ability to 
plot/print a string using hardware character capabilities. The 
Upload command can be used to upload the red-green-blue values 
used for the color table on color graphics terminats’ lor 
stipple patterns to be used for "colors" on monochrome devices 


as in PLOTS3). The Erase command will clear the screen, 
establish the background color, or advance the page, as 
appropriate for the type of plotter or display. An Output 


command is used to produce hardcopy output or print the memory 
map. A general instruction that can be used to extend the 
command set for any other non-standard command required rounds 
out the device dependent commands. 


Bug Fixes and Future Versions 


The assembly tanguage and BASIC programs in this’ system 
have been tested so far on four different computers and six 
different types of printers. I would appreciate hearing about 
any problems you have or changes that you make to the program. 
I am particularly interested in versions for different printers 
or drivers for other plotting devices such as graphic terminals 
and plotters. Please send your comments and questions to _ the 
author at: 


Tom Speer 

887 Briddlewood Ln. 
Dayton, Ohio 45430 
(513) 429-2781 


It is important that a common version be maintained that 
incorporates fixes to all of the bugs and implements the 
improvements that are of general interest. 


As mentioned above, all future updates to this version of 
PLOT will be compatible with the existing plot files and high 
level software. Future drivers are also planned for creating 


and interpreting the vector command file on mainframe computers 
using CALCOMP or Tektronics plotters and terminals. As much as 
possible, the eXtend command should be used for adding neat new 
features for your printer or taking advantage of the 
capabilities of more advanced devices. This will make it 
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Possible to maintain the file format aS a means of exchanging 
information without a fatal proliferation of exclusive 
versions. 


Acknowledgments 


I owe a special debt of thanks to all the people that have 
been my guinea pigs in adding new printers and discovering 
bugs. Especially Hal Carter for his help and encouragement, 
Kirk Horton for really wringing out the system in his VLSI 
applications, and Mike Gingrich for his critiques of the system 
and documentation. 


RUNNING PLOT 
To use PLOT, first create a sequential disk file of plot 
commands. These are described fully in the next section. Then 
execute PLOT by typing: 
PLOT33 ifn [ofn] 


ifn is the input file name. A file type of .VEC is 
assumed if no file type is given. 


[ofn] is an optional output file name. If no output file 
is given, the output from PLOT will go directly to the printer 


(CP/M LST: device). If an output file is specified, all of 
the information normally sent to the printer will be stored in 
the disk file instead. In this case, no printed output will be 


produced. PIP or some other utility may be used to print the 
picture. This option is useful for making multiple copies or 
for including graphics in the middie of text files. The 
default output file type is .PLT . 


Note: Output files are tlarge- typically 40 to 60k. Be 
sure to leave enough space on the disk for the entire file. 


APPLICATION PROGRAMMING 


Application programs "plot" by writing the appropriate 
plot command to a disk file. This file later becomes PLOT's 
input file. The plotting area is a square, with the 
coordinates (0.0 , 0.0) located at the bottom left corner, and 
the coordinates (1.0 , 1.0) located at the upper right corner. 
These coordinate values are independent of the resolution or 
aspect ratio of the plotting device. PLOT converts’ these 
values to the actual number of rasters (dots) used by the 
printer to produce a square plot approximately eight inches on 
a side. 
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 * ] All plot commands are written to disk one after the other, 
with no spaces or delimiting characters between them. Each 
Command consists of an ASCII character followed by the binary 
data which it requires. Many languages, such as BASIC, insert 
extraneous characters, such as carriage returns or line feeds, 
at the end of each block written. Because of this, plotting 
commands should not be split between blocks, as these extra 
characters will be interpreted as data in @ command. If the 
extraneous character occupies the position of a command 
character, however, it can be detected and ignored. The 
current application programs output plot commands in 128 byte 
blocks. If a command will not fit in a given block, the btock 
is written to disk, and the next command written in a new 
block. This ensures that the extraneous characters will fall 
between commands where PLOT can deal with them. When using 
fixed length blocks or records, each can be padded with "N"'s 
to preserve its length before it is written. 


The recommended command sequence to produce a picture is: 


1 Set the color to black or white (color values 127 or 
0) for a background. Usually white is used. 


2. Erase the picture to initialize the memory map area 
and establish the background. 


o 3. Set the color value for plotting. Usually black (127) 
is used. 


4. Establish a starting point by using the Move command, 
plotting a single point, or plotting a tine segment using 
the Draw command. 


5. Proceed to create the remainder of the plot. The 
Increment command is recommended when one line segment is 
connected to the previous one, as in @ curve. 


6. Be sure to include an Output command to print the 
final plot. 


7. Use the Quit command to stop plotting. PLOT will 
terminate automatically at an end-of-file, but with an 
error message, and without printing the picture. 


PLOT COMMANDS 


Each command is of the form: 


Adata 
r "A" pepresents the single ASCII character as explained below. 
S "data" represents 0 to 86 bytes of data required for the 
particular command. Usually this consists of fixed point 
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oO Numbers giving the coordinates of points or ends of tine 
Segments. No spaces or delimitating characters are used 
between fields within a command or between commands. The 


individual commands are described in Table 1. 


The data values required for the plot commands are not 


ASCII character strings. Thus, they cannot be made using 
normal formatted output of the coordinate variables in the 
application program. The coordinate values are 16 bit fixed 
point numbers. These are created in a high level program by 


multiplying the floating point value (between 0.0 and 1.0) by 
32767 and truncating the result to an integer. In BASIC, the 
MKI$ function can be used to store the data in a_e string 
variable, which is then written to the disk file. FORTRAN 
programmers can simply use unformatted files or convert 
everything to characters and use A formats. Under PASCAL, the 
file can be declared to be a FILE OF CHAR and the binary values 
converted the characters using the CHR function. This does not 
work well for Turbo Pascal, however, since Turbo places’ the 
file size and record tength at the head of a FILE OF CHAR. 
Turbo Pascal users should use TEXT files instead. The 
different word tengths, internal storage formats, and file 
structures have to be considered when constructing the command 
file on mainframes and microcomputers other than CP/M based 
machines. The ablility to structure a file as a byte stream is 
the basic requirement. The CP/M Dump utility can be used to 
°o ensure that the contents of the file are what you expected. 


The 16 bit data values are stored with the low order byte 
first (swapped format). This is the standard way of storing 
words for the 8080 and Z80 processors. In the case of the one 
byte integer required by the Color command, the first element 
of the string created by MKI$ should be used, as MKI$ 
automatically places the bytes in swapped format. 


Note that because the data values are not ASCII strings, 
the CP/M TYPE command will not properly display the file at the 
console. In addition, the [0] option must be specified when 
using PIP to transfer either the vector command file (.VEC) or 
the printer (.PLT) file. 
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© TABLE 1 


PLOT COMMANDS 


Command Length 
Name Character Data (bytes) Command Data Description 
Color c b 2 8 bit integer specifying one of a range of 


colors. O indicates white, 
127 indicates black. 


Draw D X1,Y1, 9 Coordinate pairs for ends of tine segments. 


Erase E 1 Sets the entire ploting area to the 
currently selected Color value. 


Fill F X1,Y1, 11 Coordinate pairs for ends of tine segment 
X2,Y2,Yf and horizontal tevel (Yf) defines area to 
be filled in with currently selected color. 
Incre- I X,Y 5 Coordinate pair for end of line segment. 
ment Starting coordinate is last point plotted. 
oS Move M X,Y 5 Coordinate pair for new "pen" position. 
No-op N 4 Ignored. Used as space filler in sequence 
of commands to exactly fill a disk record. 
Output 0 1 Causes current picture to be printed. 
Point P X,Y 5 Coordinate pair for point to be plotted. 
Quit Qa | Commands normal termination of program. 
String s X,Y, 6 Coordinate pair for start of character 


string to string to be printed. String 
86 MUST end with a Carriage Return. 


Text T string a+ String of arbitrary length. String MUST 
end with a <NULL> (OOH) character. 
Upload U N, 3 N is a 16 bit unsigned integer giving the 
values to number of values to follow. Values 
N+3 specify basis for creating new "colors". 
eXtend X N, 3 N is a 16 bit unsigned integer giving the 
values to number of values to follow. Values are N 


N+3 bytes of whatever data is necessary. 
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The following sections describe the way in which the 
Commands have been implemented in PLOT Version 3.3 (PLOT33). 
Other drivers may not implement them in exactly the same way, 
but the general sense should be preserved. 


Colors are simulated in PLOT33 by using stipple patterns. 


These patterns apply to all points, lines, and filled areas. 
These patterns are based on 8 dot by 8 dot cells that tile the 
entire picture area. Imagine cutting each figure out of a 


sheet entirely covered with the desired pattern and then 
Pasting it on the plot in progress. This gives a general idea 
of the way in which the patterns work. Three different methods 
of generating the patterns are used. Each method trades off 
the memory required to store the basic patterns with the 


ability to specify exactly what the pattern will look ltike. 
When a Color command is’ given, all subsequent plotting 
will be done with that "color", or pattern, until it is changed 


with another Color command. The Color command simply acts as a 
selector to pick one of a number of colors or patterns that are 
currently available. A color code of O corresponds to white. 
Lines and filled areas plotted with this color will absolutely 
erase any dots that were previously plotted. Color codes from 
1 through 48 will produce cross hatched patterns that generate 
checkered areas and other distictive patterns. Codes from 49 
to 638 correspond to 15 special patterns that can be programmed 
to exactly match any desired pattern based on the 8 x 8 dot 
cells. Codes from 64 through 127 are generated using an 
ordered dither matrix, in which each succeeding code is the 
Same as the previous one, except for one more dot per cell 


being plotted. These are currently set to generate a range of 
shades of gray. All of these patterns can be changed under the 
control of the application program by using the Upload 
command, 


Each dot is added to the memory map by OR'ing it with the 
dots previously plotted. Each subsequent figure does not 
totally obscure the existing picture. For example, suppose 
that a gray shade is being used that consists of every other 
dot being plotted. The dots that are not plotted will not 
cause the existing dots to be set to white if they were 
previously plotted. Negative color values (-1 to -127) will 


use the same pattern as their positive counterpart, but will be 
XOR'ed with the existing picture. This means that the figure 
will be plotted black on white or white on black, depending on 
what the existing background is. Plotting the same figure 
twice with a negative color value will have no net effect on 
the picture. Filling the whole picture with -127 (negative 
black) will have an effect tike making a photographic 


negative. 


The String command is used to mix printed characters and 
graphics. The characters are printed using the printers normal 
character set. No facility is provided in PLOT383 to send <ESC> 
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Codes or control characters to the printer to change character 
sizes or font styles. The string is printed starting near the 
coordinates given in the command. The exact position will 
vary, but the first character will cover’ the coordinate 
location. The ambiguity comes from the fact that most printers 
can only print characters at their normal location on the page, 
and can't use graphics commands to position the characters at 
any arbitrary place on the line. In addition, a printed 
character can't be part on one line of print and part on 
another. Therefore, PLOT33 computes the closest character 
location to the desired coordinates and begins the string 
there. 


The Text command will immediately send a text string to 
the printer when the command is encountered. This is quite 
different from the String command, because the text is not put 
in the memory map and is not part of the picture. This command 
is useful for positioning the plot on the page, for printing 
titles and headers, and for advancing to the next page after 
the plot is printed. Any ASCII characters may be included in 
the string, including control codes, escape sequences, carriage 
returns, and linefeeds. The only exception is the null 
character, OOH, which is used to signal the end of the string. 
The string may be of any length. This makes it a convenient 
way of imbedding a figure in the middle of a document, since 
all of the text above the figure can be included in one Text 
command, as can all of the text after the plot. Any text to be 
included in the plotting area itself must be entered one line 
at a time with the String command. 


Upload Command 


The Upload command deserves some special attention, 
because it is the least standard of all of the commands 
currently implemented. Most dot matrix printers can, of 
course, only print in black. To give these printers a "color" 
capability, different patterns have been programmed to produce 
shades of gray and distinctive cross hatched patterns. The 
cross. hatched patterns are intended to be used for bar charts, 
dotted and dashed lines, etc. The shades are the closest that 
PLOT33 can come to true colors. The special patterns are very 
useful for matching patterns produced by other systems, and for 
anything that just can't be done with the other two methods. 
The Color command acts as a selector to choose between the 
pre-defined patterns. The Upload command is only needed if the 
default patterns are not capable of producing the desired 
effect. It will redefine the patterns from which the Color 
command can select. 


The cross hatched patterns are based on seven bytes that 
provide the basic patterns in both the vertical and horizontal 
directions for each cell. One byte from the seven is selected 
as the X pattern and one byte from the seven is selected as the 
Y pattern. The X pattern is extended vertically throughout the 
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cell, and the Y pattern is extended horizontally throughout the 
cell. The two patterns are reversed (XOR'ed) where they 
cross. The effect is much like weaving a plaid material. The 
selection of the bytes for the X and Y patterns is made by the 
Color code. The tower three bytes of the Color value select 
the X byte and the next three bytes select the Y byte. The 
best way to determine the exact apperance of each pattern is to 
experiment by filling blocks with different patterns. 


If the existing patterns are not acceptable, new ones can 
be Uploaded. Set the number field, N, to O7H. The next seven 
bytes will be the bytes that form the basis for the patterns. 
Each bit corresponds to a dot in the pattern. A byte of 07H 
for the X pattern would produce the pattern wg oer eg If an 


FOH is used for the Y pattern, the final cell will look like: 


RRR 
ce 


The second type of pattern, used for the 15 special 
patterns, is specified by giving the 8 bytes that produce the 
pattern. Thus, the sequence OOH OOH 99H OOH OOH SSH OOH OOH 
will produce the pattern: 


* * 

oo Kae 

ecw eeae 

wa oat os 

Get eet es 
* Ok 


These patterns are uploaded by specifying 120 for N followed by 
the 120 bytes that define all 15 of the special patterns. No 
facility is provided for just uploading one set of 8 bytes. 


The other method for producing patterns for "colors" is an 
eight by eight byte dither matrix. In this method, each byte 
in the matrix corresponds to one dot in the eight by eight dot 
cell. These cells tile the picture plane, as before. Color 
code values from 64 to 127 are used to select the 64 patterns 
created by the dither matrix. Each element of the matrix is 
assigned a value from 63 to 126. If the Color value is greater 
than the value in the matrix corresponding to a given dot, that 
dot is plotted. Thus, 127 is greater than all of the elements, 
and all dots in the matrix will be plotted, producing black. 
If each element of the matrix is assigned a different value, 
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then a unique pattern will be aessociated with each Color 
value. For example, if the Color code is 64, only the element 
with a value of 63 will produce a dot. If the Color value is 
65, those elements with 63 and 64 will produce dots. As the 
Color code is increased, and figures are plotted, another dot 
in the "tile" has the potential for being plotted. 


The existing arrangement of values in the dither matrix is 
designed to produce shades of gray with a minimum appearance of 
organized patterns. This matrix came from Foley and Van Dam's 
"Fundamentals of Interactive Computer Graphics", A common use 
of the Upload command is to change the matrix to provide 
diagonal patterns for shading areas. This would produce a 
pattern that looks like (for four cells): 


S111 
1/11 
1/11 
S111 


To design an Upload sequence for a given pattern, lay out 
a matrix representing a single cell. Start with 63 and place 
the numbers in the matrix in the pattern desired. For example, 
a cell from the diagonal pattern above could be created from 
the matrix: 


63 111 85 103 75 115 93 95 
112 64 104 86 116 76 S96 94 
79 105 65 117 87 97 77 121 
106 80118 66 98 88 122 78 
71 119 81 99 67 123 89 107 
120 72 100 82 124 68 108 930 
91 101 73 125 83 109 69 113 
102 92 126 74110 84114 70 


To see the pattern, look at the matrix part way through its 
construction: 


63 75 
64 76 
65 77 
66 78 
71 67 
72 68 
73 69 
74 70 
For this matrix, the Color code 79 will result in all of the 


above points being plotted in any filled in area, and the 
diagonal pattern will emerge. 


Once the matrix is constructed, the Upload command to load 
it is formed by an ASCII "U" followed by 40H, OOH to indicate 
64 bytes to come, and finally 03H, 6GFH, etc., the bytes of the 
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matrix. The matrix is read in one row after another ( the 
[1,1] element followed by the [1,2] element, ..., to the [1,8] 
element, then the [2,1] element, ...). All of the matrix 
values are binary 8 bit values. In BASIC, use the MKI$ 
function to convert the integers to strings, then use the first 


Character. 


To summarize the Upload command: The Color codes from 1 
to 48 are produced by cross-hatched patterns based on_ eight 
pattern bytes. These can by Uploaded by a "U" O8H OOH followed 
by eight new pattern bytes. The Color codes from 49 throuth 63 
are Uploaded by a "U" 78H OOH and the 120 bytes that define the 
15 cell patterns. The Color codes’ from 64 through 127 are 
produced by a dither matrix. This is created by assigning 
elements of an eight by eight matrix the values 63 through 
126. The matrix is Uploaded by a "U" 40H OOH followed by the 
64 elements in row major order. 


PITFALLS AND LIMITATIONS 


This section amplifies the more subtle points and 
limitaions of PLOT33's commands. 


The valid range for coordinate values is 0 to 1. This 
corresponds to binary integer values from O to 32767. As each 
point is plotted, a check is made to insure that the coordinate 
is within the memory map. If it is not, the point is not 
plotted. This is mainly to keep the program from running amok 
and writing over parts of memory that are not part of the 
memory map of the picture. This is not intended to be a form 


of windowing. If you want to zoom in on a part of a larger 
picture, the picture should be clipped by the application 
program. Note also, that most high level languages will not 


deal with positive integers that are larger than 382767, as 
these larger numbers represent negative integers. 


In contrast to the coordinate values used for all of the 
graphic commands, any coordinate value outside the picture used 
to indicate the start of printing a string will be set to 


zero. This is intended to make the String command act as much 
as possible like a normal printer. When the string goes off of 
the right hand side of the plot, the X coordinate for the next 


character will be set to zero and the string will wrap around- 
just like a carriage return without a tinefeed. All characters 
that attempt to be printed above or below the plot will be 


printed on the bottom line. 


String has a few other points of interest. Only printable 
characters should be used. Control characters and escape codes 
will occupy their respective positions in the memory map but 
will not be printed. This will cause the rest of the tine to 
be shifted to the left and destroy its alignment with the rest 
of the page. Also, the character pitch must agree with the 
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oe character width set at assembly time, or the alignment will be 
affected. 


The coordinates for the start of the string are truncated 
to the nearest multiple of the size of the character. Thus the 


specified point will be within the first character, but the 
character will not be centered or aligned with the given 
coordinate position. This was done because most printers 


insist that the printed characters occupy these locations, and 
PLOT383 has to respect this or the aligment of the rest of the 
line will again be affected. 


PLOT33 prints the strings, it does not plot them as line 
segments. Because of this, a printed character will absolutely 
occupy its location on the plot, and any overlapping lines or 
points will not appear. If a character is printed on a 
patterned background, it will appear as if it were in a white 
box the size of the character. If true graphic characters are 
desired, they must be drawn by the application program as Line 
segments. An additional implication of the printed characters 
is is their size relative to the graphic bit images that are 
sent to the printer. The graphics are printed in "strokes" 
that ere one dot wide and seven dots high. Many printed 
characters are higher than seven dots especially those that 
have descenders. A printed character occupies a space that is 
seven dots high in the memory” map. Thus, the top line of 

re] capital letters and the lower case descenders can overlap the 
graphics area above and below the nominal area of a printed 
character. The distance that the paper is advanced between 
lines is dictated by the height of a graphic "stroke", and is 
nearly always smaller than the normal single spaced distance. 


Printed lines must therefore be "double spaced" by specifying 
starting coordinates that are well separated vertically. This 
is a device dependent aspect, and a litle experimentation may 


be needed to achieve a good appearance. 


The last caution about the String command is that it MUST 
end with a carriage return character. This signals the end of 
the string, and without it, the program will continue to read 
the rest of the input file as part of the string until it 
either encounters a carriage return or the end of the file. 
The String and Text commands are the only commands with this 
potential, as all of the others have a definite number of bytes 
of date. All these caveats regarding the String command may 
sound a little gruesome, but it is really not much different 
from normal printing. If its limitations are too inhibiting, 
you must draw the characters instead of printing them. 


The Text command is output to the printer at a different 
time than any of the other commands. Its contents are sent 
immediately when it is read, whereas all other commands cause 

*] their actions to ba stored in the memory map and only printed 
when an Output command is received. Thus, it cannot be used to 
send escape sequences to the printer in the middte of the 
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plot. Whether graphics commands (such as Draw, Fill, etc.) 
Preceed or follow a Text command is immaterial, since these 
Commands affect the memory map at the time that they are read 
and not the printer. What really matters is the position of a 
Text command relative to the Output commands in the file. 


Like the carriage return at the end of the String command, 
omitting the O byte at the end of the Text command can have 
disasterous consequences. 


The line spacing used in the Text command is different 
from the line spacing in the plot itself. The Output command 
sets the tine spacing to be appropriate for graphics, and then 
resets it to the normal text single spacing when done. If a 
uniform appearance is required throughout, each Text command 
should contain the control characters or escape sequences 
required to set the line spacing to match that used in the plot 
itself. 


The final consequence of the line spacing is that the form 
length and the top of form position set in the printer will be 
wrong. The Output command will result in the printer being 
positioned at the bottom of the plot. This is to allow several 
plots to be printed sequentially as one continuous picture 
without any gaps between them. In order to advance to the top 
of the next page, the Text command must be used to issue _ the 
correct number of line feeds and then tell the printer to reset 
the top of form. 


The Output command does not erase the existing picture. 
Thus several copies of the same plot can be _ produced by 
repeating the command. In addition, this allows building up a 
picture in stages and printing it at each stage. To print one 
plot and start anew, you must Output the first, set the Color 
to white, Erase the page, and then set the Color back to the 
plotting color or pattern. The program does not automatically 
execute an Output command at the end-of-file or when Quitting. 
You must include an Output command to get any output at all. 
This philosophy is to accomodate those devices, like graphic 
terminals, that display the plot as it is being made, and only 
need an Output command for hardcopy. 


ERROR MESSAGES 


Disk is Full. 


Fatal error. No more room exists on the designated disk 
for writing the output file. Ensure that enough room is 
available and run PLOT again. Note that a different disk drive 
may be specified for the output file than the one used for the 
input file. If disk space is not available, run PLOT in the 
direct printing mode. 
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Any remnant of the output file may be printed, but the 


last record will probably contain an incomplete graphic output 
Sequence. The printer will expect to receive additional bytes 
of graphics. This will produce a swath of dots with a random 
apperance, unless nulls are sent. In addition, the printer 
line spacing will remain set for the size of the graphic 
output. 


End of File. 


Fatal error. The end of the input file was encountered 
when PLOT attempted to read the next record. Add a Quit 
command for the normal termination of the program. 


File not Found. 


Fatal error. The file name given for the input file could 
not be found on the _ disk. Make sure that the spelling was 
correct, that the proper drive is specified in the file name, 
or the right drive is logged in as the default drive. 


No Directory Space Available. 


Fatal error. When PLOT tried to make a new output file, 
there was no more room in the disk directory. Erase a file, 
use a different diskette, or run PLOT in the direct printing 
mode, without making an output file. 


No File Specified. 


Fatal error. No input file name was given. PLOT will not 
prompt you for a_ file name, and there is no interactive mode 
for entering commands. Create an input file and try again. 


Undefined Command Character Encountered. 


Warning error. When PLOT attempted to interpret the ASCII 
letter portion of a command, a character was found which did 
not correspond to one of the established commands. PLOT 
ignores these characters and attempts to interpret the next 
character as a command. If a command does not have the proper 
number of data bytes, or if an extraneous character is inserted 
in the middle of the data portion of a command, the rest of the 
file will be out of sequence. Eventually, PLOT should get back 
in step with the command stream, but the overall effects are 
unpredictable. 
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PART @. APPLICATION PROGRAMS 


BASIC PROGRAMS 


Several sample BASIC application programs are included as 
examples of possible implementations. BASIC was selected 
because it is almost universally available on CP/M systems and 
is a good language for quick one-of-a-kind plots. The first 


file is GRAPH.BAS. This file contains a plotting "library" of 
routines that give direct access to the low level commands used 
by PLOT. It also includes routines for scaling, and for 
drawing a complete graph with labeled axes. This file is used 
by the other programs. For each command that can be written to 
the .VEC file, there is a corresponding subroutine in 


GRAPH.BAS. 


To use these subroutines, first load the appropriate 


variables with the necessary data. For example, to draw a line 
segment, set X1 and Y1 to the starting coordinates, and set X2 
and Y2 to the ending coordinates (remember that all coordinate 


values are between 0.0 and 1.0). Then GOSUB to the subroutine 
for that function, in this case the DRAW LINE SEGMENT routine, 


which is currently line 177. That's all that is required. 
Drawing axes or graphs is done the same way. Set the required 
values and GOSUB to the appropriate routine. All of the 


variables are documented in the REM statements at the top of 
the file, and a sample plot is depicted, followed by the 
settings that would produce it. The BASIC package 
automatically issues the commands’ to initialize the plotting 
area, S80 you can start plotting immediately when the the 
application part of the program starts executing. End the plot 
by calling the QUIT PLOTTING routine, at line 200. This will 
automatically add the commands to print the picture and close 
the file. 


Four statement functions are provided to make it easy to 
scale your data and compute plotting coordinates. Functions RX 
and RY will convert your "real world" values to X and Y 
coordinates for plotting. Functions UX and UY do just the 
opposite, converting coordinates on the page to the equivalent 
coordinates in the user defined plane. These functions require 
that you have established the margins, etc. as if you were 


plotting a graph. The default values for these settings will 
result in the conversion functions simply returning the same 
value as their input. Note that although the margins are 


useful for confining the plotting to one section of the page, 
no clipping is done to insure that all of the points plotted 
are indeed confined to that area. 


The next file is called TEST.BAS. It is a sample program 
that illustrates how to use the routines in GRAPH.BAS. To use 
TEST, enter BASIC-80, then LOAD "GRAPH.BAS". MERGE "TEST.BAS", 
and RUN it. The program can produce one or both of two plots. 
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 « ] The first is a polygon with all of the vertices connected to 
each other. This provides a good test of the line drawing 
capabilities of PLOT. The second plot is a graph of a e damped 
sine wave. It illustrates nearly the complete range of PLOT's 
capabilities. 


Two programs, FILLS and UPLOAD, are an aid to 
experimenting with the patterns used to represent colors by 
PLOT33. Both are to be used with GRAPH.BAS in the same way aS 
TEST.BAS. FILLS.BAS will produce an array of blocks showing 
the stipple patterns used to represent each "color". This 
makes an easy reference for future plotting. UPLOAD.BAS is 
similar to FILLS.BAS, except that before plotting the blocks, 
it Uploads new definitions for the patterns. The dither matrix 
used is like the example used in the previous section. The DATA 
statements of this program can be changed to experiment with 
different definitions and then incorporated into your 
applications. 


The final program is HANDPLOT.BAS. This is a general 
Purpose program for manual plotting of data. The program uses 
a menu to display the BASIC plot package settings and allow 
them to be changed. Data can be typed in from the keyboard, 
saved in a disk file, and plotted. A limited number of symbols 
are avalilable for identifying data points and the points may 
optionally be connected by straight lines. Plotting scales and 

oe axes may be specified manually, or determined automatically 
from the range of values in the data. To make it easy to enter 
this program directly from the operating system command level, 
the routines in  GRAPH.BAS have already been included and no 
MERGE operation is required. 


When HANDPLOT is first entered, it prompts the user for 
the name of the .VEC file, and for the dimensions of the data 
arrays. It then displays the menu. The menu is divided into 
three parts which are concerned with the data, the format of 
the graph, and the activities that can be performed by the 
program. It will took like this: 
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Oo DATA SETTINGS 
No. of Variables 0 No. of Points Q 
1> Data Entry KEYBOARD 2> Input File 
83> Output File 

4> X Variable 5> Y Variable 

6&> Symbol NONE 7> Connect points FALSE 

GRAPHIC SETTINGS 

X Axis 8> Min OG 9> Max 1 10> DeltaX 1 
11> Label Chars O 12> Divisions 0 

Y Axis 13> Min 0 14> Max 1 15> DeltaY 1 
16> Label Chars OQ 17> Divisions 0 

Margins 18> Left 9O 19> Right 0 
20> Bottom O 21> Top 0O 

22> Cotor Value 127 23> Auto-Scale TRUE 


24> Clear Plot Area First FALSE 
25> Plot Output File Name JUNK.VEC 


ACTIONS 

26> Read New Data 27> Edit data 28> Write Data 
29> Plot Graph Axes 30> Plot Data 81> Title Plot 
32> Advance Page 33> End Program 


Enter Number of SETTING or ACTION? 


From here, the program is operated by giving all of the 
oS required settings their correct value, and then selecting the 
desired action. This is done by entering the number printed 
next to the entry on the menu. Each setting will then prompt 
you for the data that it needs, if any. Several settings, such 
as Data Entry, only toggle between two values; in this case, 


KEYBOARD or DISK. The settings may be entered in any order. 


The first thing you will probably want to do is to enter 
some data to be plotted. If the data is to be read from a disk 
file instead, then enter 1 to toggle to DISK. You will then 
have to enter 2 to have the program prompt you for the input 
file's name. If the data is to be typed in, you are already to 
go. Now enter 26, and the program will start to read the disk 
file, or prompt you for the data. Once the data has been read 
in, it can be changed using option 27, Edit Data. The data can 
also be stored on disk using option 28. The output file name 
is handled in the Same way as the input file name. 


Next you will want to indicate, using settings 4 and 65, 
which variables are to be used for the X and Y axes and whether 
the points should be plotted with one of the available symbols 
and/or connected with straight lines. 


If you are simply plotting a figure, you are ready to plot 
it using option 30, Plot Data. If you are plotting a graph, 


oO then all of the settings in the next section should be given 
their correct value before plotting the axes with option 29, 
Several sets of data can be plotted on the same graph, simply 
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by changing the X and Y variables and symbol and plotting the 


data again. Strings can be printed anywhere on the graph using 
Option 31. 
The DeltaX and Divisions settings are linked to each 


other, as are the DeltaY and Divisions setting for the Y axis. 
When the DeltaX or DeltaY setting is changed, the Divisions 
settings will be reset to indicate the number of divisions 
between the Min and Max values. If the Divisions setting is 
changed, the DeltaX or DeltaY setting will be calculated to 
give a good engineering value [multiples of 1, 2, 5, or 10), 
and the Divisions setting will reflect the revised number of 
divisions. Thus the value you enter into the Divisions setting 
will only be approximately the value that will ultimately 
result. If your engineering esthetics differ from the 
program's, you will have use the DeltaX and DeltaY settings. 


In a simitar fashion, the Auto-Scale option will reset the 
Max and Min values to include the actual range of the data, and 
will use the Divsions settings to indicate the approximate 
number of labels to use for each axis. 


Advance Page will issue an Output command, clear’ the 
frame, and set the color to black for further plotting. The 
frames will be plotted one after the other with no space in 
between them. End Program will issue an Output command, close 
out all files and, return to the BASIC command level. 


Several plots can be put on one page, simply by adjusting 
the margin values between plotting each graph. If Clear Plot 
Area First, setting 24, is TRUE, the area inside the margins 
will be erased to white using the Fill command before the axes 
are plotted. This is useful for plotting one graph as an inset 
within a larger figure. 


The data file has a simple format, and can be made using 
your editor or another program, - rather than laboriously 
entering all the data with HANDPLOT. The first record contains 
the number of variables, or fields, in the data records to 
follow. The next entries are names, up to 20 characters long, 
for each of the variables. These can be on the same _ line, 
separated by commas, or each may be on a record by itseif. The 
data values are next. One value for each variable is read in 


turn, until the end of the file is encountered. The values on 
any given tine are separated by commas, and each logical record 
(one value for each variable) may be spread over several lines 


of data. A sample data file is shown below: 


3 <--- Three Variables 

xX, Y, Z <--- Names for each variable 

123, 4.56, 78.9 <--- First record: X=123, Y=4.56, Z=78.9 
10 .11,1213,1516 .17 

18.0, 19.0, 20 <--- Last record 
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re ] TURBO PASCAL LIBRARY 
Turbo Pascal support is provided in the form of two 
"include" files end one test program. GRAF1.PAS contains the 
globat declarations and lowest level routines. These provide 
direct access to the commands in the  .VEC file. It also 
provides functions to do scale conversions, GRAF2.PAS uses 


these routines to provide the additional capability to plot 
graphic characters, plot axes, and do whole Cartesian grids. 
Each routine and its calling arguements are summarized in Table 


2. 

Plotting is initiated with the procedure’ GRINIT. This 
procedure opens the disk file and initializes the plot, as 
discussed previously. It also initializes all global 


variables. The GRFINI routine writes the Output and Quit 
commands and closes the plot file. 


The following routines correspond directly to commands in 
the plot file: COLOR, ERASE, FILL, GPRINT, GSTRNG, GMOVE, 
POINT, SEGMNT, and VECTOR. 


Scaling is accomplished by using RWINDO to set the real 
world limits and SWINDO to map the real world timits to a 
specific area on the page. In the interest of execution speed, 
no clipping is done to ensure that the plotting is confined to 


oO either window. The functions SX and SY are used to _ convert 
from the real world coordinates to the normalized device, or 
"screen" coordinates. The reverse conversion is performed by 
RX and RY. 


GRAPH plots a complete grid given the range of data and 
area on the page. AXIS can be used to make special graphs and 
DXDY will calculate good engineering values for AXIS. The 
graphic characters and strings are plotted by GCHAR and GWRITE, 
respectively. 
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Sets color/pattern- sends Color command. 
integer which selects color or pattern 


gmove 


gprint 


grinit 


grfini 


gstrng 


point 


segmnt 


vector 


name 


Clears page- sends Erase command. 


Fills trapezoidal 


normalized 
normalized 
normalized 
normalized 
normalized 


X 
Y 
x 
Y 
Y 


area- 
coordinate 
coordinate 
coordinate 
coordinate 
coordinate 


"Pen up" move to point— 
normalized X coordinate 
normalized Y coordinate 


sends Fill 


for 
for 
for 
for 
for 


command. 
start of segment 
start of Segment 


end of segment 
end of segment 
fill tevel 


sends Move command. 


Prints picture- sends Output command. 


Initializes 
string specifying name of 


Quits plotting, 


VEC file 


closes 


VEC 


Prints string-— sends String 


normalized 
normalized 


Xx 
Y 


string to be 


Plots point— 


normalized 
normalized 


Plots line 
normalized 
normalized 
normalized 
normalized 


"Pen down" 
normalized 


x 
Y 


segment— 


X 


Y 
xX 
Y 


move— 


X 


coordinate 
coordinate 


for 
for 


-VEC file 


file 


command. 
first character 
first character 


plotted (no <CR> at end) 


sends Point command. 


coordinate 
coordinate 


coordinate 
coordinate 
coordiante 
coordinate 


coordinate 


normalized Y coordinate 
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for 
for 
for 
for 


sends Draw command. 


start of Segment 
start of segment 
end of segment 
end of segment 


sends Increment command. 
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oe TURBO PASCAL ROUTINES (CONT) 
Name Inputs Outputs Function 
rwindo Establishes real window for scaling. 
xmini real world value at left side of window 
xmaxi real world value at right side of window 
ymini real world value at bottom side of window 
ymaxi real world value at top side of window 
swindo Estab!ishes window on page for scaling. 
sxlti normalized X coordinate for [eft side 
sxrti normalized X coordinate for right side 
syboti normalized Y coordinate for bottom side 
sytopi normalized Y coordinate for top side 
sx Converts from real world to normalized coord 
rxi real world X coordinate 
SX normalized X coordinate 
sy Converts from real world to normalized coord 
ryi real world Y coordinate 
sy normalized Y coordinate 
rx Converts from normalized to real worftd coord 
sxi normalized X coordinate 
«| rx real wortd X coordinate 
ry Converts from normalized to real wortd coord 
syi normalized Y coordinate 
ry real world Y coordinate 
axis Plots axis at arbitrary orientation. 
r1 real world value at start of axis 
re real world value at end of axis 
dri real world increment for tic mark intervals 
sx1 normalized X coordinate for start of axis 
sy1 normalized Y coordinate for start of axis 
8x2 normalized X coordinate for end of axis 
sye normalized Y coordinate for end of axis 
ticlen normalized length of tic mark 
ticang CCW angle, in deg, from horiz. to tic mark 
Iblnum integer number of char's in tic mark label 
IbIldec integer number of char's after decimal pt. 
Iblang CCW angle, in deg, from hor. to {bl X axis 
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chset 


gchar 


oe gwrite 


dxdy 


posang 


ticend 
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TURBO PASCAL ROUTINES (CONT) 


Cx 


cy 
charin 


IbInum 
[bldec 


angle 
posang 


rmin 

rmax 

dr 
pri 
pre 


Function 


Plots complete Cartesian grid. 

real world value at left side of graph 
real world value at right side of graph 
integer- approximate number of X intervals 
real world value at bottom side of graph 
real world value at top side of graph 
integer— approximate number of Y intervals 
normalized X coordinate for left side 
normalized Y coordinate for bottom side 
normalized X coordinate for right side 


Sets size and orientation of graphic char's 


normalized width of character 
normalized width of character 


CCW angle, in deg, to char X axis from hor. 


Plots graphic character. 

normalized X coord of bottom left corner 
normalized Y coord of bottom left corner 
ASCII character to be plotted 


Plots string of graphic characters. 
normalized X coord of bottom left corner 
normalized Y coord of bottom left corner 
string to be plotted 

integer number of characters to be plot 


Calculates arguements for axis. 

real world value at start of axis 

real world value at end of axis 
integer-— approximate number of intervals 
integer number of char's in tic mark l/abel 
integer number of char's rt. of decimal 


Converts angle to range in 0 to 360 deg 
angle to be converted 
converted angle 


Calculates values for ends of axis 

raw real world value for start of axis 
raw real world value for end of axis 
real world increment between intervals 


converted real world value at start of axis 
converted real world value at end of axis 
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TURBO PASCAL ROUTINES (CONT) 


Name Inputs Outputs Function 


writecmd Buffered output of command string to file. 
cmd output string 
cmdlen integer number of characters to be output 
ne 4 
buffout Flushes buffer. 
outunit file variable specifying output file 
outbuf string of characters forming buffer 
size number af characters to be sent out 
concated Concatenates portions of strings. 
strng1 first string to be concatenated 
nchar' number of characters from strng1 
strng2 second string to be concatenated 
nchare number of characters from strng2 


strng3 string containing strng1 and strng2 


FORTRAN LIBRARY 


A collection of FORTRAN routines is also inctuded in 
GRAF.FOR. This file is the FORTRAN complement of the Turbo 
Pascal library. The input. and output requirements for the 
FORTRAN routines are similar to those of the Pascal routines, 
and are fully documented in the comments within them. They 
communicate with each other through a _ tabeled COMMON block. 
These routines have been run under Microsoft FORTRAN-80, but 
may require some modification for other compilers. 
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PART 3. INSTALLATION INSTRUCTIONS 


SIZING THE MEMORY MAP 


PLOT33 has been designed to keep the printer driver 
program small while providing the necessary primitive graphic 
operations for producing most pictures and plots. The reason 
for the simplicity of the of the command set is because the bit 
map for the picture is LARGE. It can use as much memory as 
your computer can give it. The size of the memory available 
for the bit-map, in conjunction with the resoultion of your 
printer, sets the size of the plot that can be made. The first 
step in installing the program is to decide how targe_ the 
memory area for the bit map can be. The program itself 
occupies about 4K. Subtract this from the size of the TPA, and 
reduce the result by a little more to provide a conservative 
pad. The end result is the target size for the size of the 
memory map. 


Divide the target size by the printer resolution (dots per 


inch) in the horizontal direction, and divide again by the 
printer's vertical resolution. Multiply this result by 7 (7 
dots are stored in each byte). You now have the number of 


square inches that can be plotted. Take the Square root, and 
round down to a convenient size for each side of the plot. 


Now multiply the height of the plot by the printer's 
vertical resolution and round down to the nearest multiple of 
7. The number of dots in the vertical direction should be ea 
multiple of 7 because seven dots are stored in each byte of the 
memory map. PLOT83 has no provisions for handling a byte which 
is contains bits that are part in and part out of the map. You 
now have the total number of dots in the _ vertical direction, 
and dividing by 7 gives the number of tines that will be 
printed when the plot is made. Finally, divide the number of 
dots in the vertical direction by the vertical resolution to 
get the final size, in inches, of the plot. 


Multiply the final size of the plot by the horizontal 
resolution to get the final number of dots accross the page. 
The final map size is the product of the number of dots 
horizontally multiplied by the number of dots vertically, 
divided by 7. 


As an example, consider a 56K CP/M system. Subtracting 4K 
for the PLOT program and 100H for the start of the TPA: 


Target Size = 57344 - 4096 - 256 = 52992 bytes 
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The Epson MX-80 has 60 dots per inch horizontal and 72 dots per 
inch vertical resolution. 


Target Size/ Hor. Res./ Vert. Res. * 7 
52992 / 60 / 72 * 7 85.9 sq.in 


=> 9.2 in. per side 


vouou 


Since the MX-80 can only plot 8 inches horizontally, the plot 
is timited by the physical limits of the printer, not by the 
memory avalilable. Calculating the vertical number of dots’ for 
an 8 inch plot: 


8 * 72 = 576 dots > 82 tines @ 7 dots/line 
> 


574 dots vertically 


Since only 2 dots were tost due to truncating to the nearest 
number of whole bytes, there is little point in trying to 
adjust the horizontal size to keep the plot square. The 
horizontal size is therefore: 


8 * 60 = 480 dots 

The final map size is calculated as: 
480 * 574 / 7 = 39360 

PRINTER SETTINGS 


Once the plot has been sized, you are ready to modify the 
settings in the assembly language’ source file (PLOT33.ASM). 
This file is large, over 7OK, so watch the disk space. If your 
editor cannot handle a file this targe, the CP/M standard 
editor, ED, can. ED can also read from one disk and write to 
another, if necessary. For each type of printer there is an 
associated flag that controls the conditional assembly for that 
printer. Set the flag for your printer to TRUE and set the 
others to FALSE. If your printer is not tisted, it may be 
similar to one that is. For example, the Gemini-10 operates 
identically (for the purposes of this program) with the Epson 
printers. The IDS printers use the same method as the Okidata 
printers for their graphics, and the NEC printers act the same 
as the C.Itoh printers. 


Next, the settings for your printer must be changed or 
verified. MAPSIZE should be set to the value calculated 
above. MAXX and MAXY must be set to 1 /ess than the number of 
dots in the horizontal and vertical directions. For’ the 
example above, MAPSIZE becomes 39360, MAXX is set to 479, and 
MAXY to 573. 


Once the settings are made for your printer, exit the 
editor and assemble the program using ASM or another 8080 
assembler. Use LOAD to create the .COM file from the .HEX 
file, and the installation is finished. 
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7.1.1 A CLIPPING ALGORITHM 


The algorithm has two parts. The first determines whether the line lies 
entirely on the screen, and if not, whether it can be trivially rejected as 
lying entirely off the screen. If it satisfies neither of these tests, then it 
is divided into two parts, and these two tests are applied to each part. 
The algorithm depends on the fact that every line either is entirely on 
the screen, or can be divided so that one part can be trivially rejected. 

The rejection test is implemented by extending the edges of the 
screen so that they divide the space occupied by the unclipped picture 
into nine regions, as shown in Figure 7-4. Each of these regions has a 
four-bit code, and the two end-points of the line are assigned codes 
appropriate to the regions they are in, The four bits in the code mean 
the following if set: 


first bit: point is above top edge of screen 
second bit: point is below bottom edge 

third bit: _ point is to right of right-hand edge 
fourth bit: point is to left of left-hand edge 


Clearly if the four-bit codes for both endpoints are zero, the line lies 
entirely on the screen. What is less obvious is that if the logical 


FIGURE 7-5 


intersection of the two codes is not zero, the line must lie entirely 
off-screen. 

If the line cannot be eliminated by either of these tests, then it must 
be subdivided. A simple method of subdivision is to find the line’s point 
of intersection with one of the screen’s edges and to throw away the 
part that lies off-screen. For example, the line AB in Figure 7-5 could 
be subdivided at C, and the portion AC thrown away. We now have a 
new line BC, to which the trivial rejection tests are applied. The line 
still cannot be trivially rejected, so we subdivide again at D. The 
resulting line BD is foynd to lie entirely inside. It is not always easy to 
determine whether subdivision should be made first at C or at D, but if 
we apply the rejection test in-a repeated fashion, the order in which 
subdivisions are made does not affect the final result. 

The inherent simplicity of this algorithm is demonstrated by the 
following implementation of it in SAIL: 


REAL XL+XR,YB,YTS 


PROCEOURE CLIP (REAL XieV1,X20Y2)3 
BEGIN INTEGER C1,C02: 


INTEGER PROCFDURE CODE (REAL x. Y)3 
SETURN (CIF ¥CXL THEN "01 ELSE CIF X>x® THEW "14 ELSE 22) © 
CIF YCYB THEN "180 ELSE CIF YoYT THEN "1208 ELSE 82003 


G1 © CODE (xX1.¥id) 
C2 © CODE (X2,Y2)) 


WHILE NOT (C1"C2=g) 00 BEGIN “COMPUTF" 


IF C1 LANO C2 THEN RETURNS “NO PART OF THE LINE VISIdLE” 
IF Ciz® THEN BEGIN "EXCHANGE POINTS 4 AND 2” 

C1 SWAP C2 X14 SWAP X25 Y1 SWAP Y2 
Enos 


JF Ci LAND "3 THEN BEGIN “PUSH TOWARD LEFT EGE" 
YL © Vie VP~V1IOCXL=K 27 (X2-K193 
X1o¢ XL 
END ELSE 
IF Ci LAND '1@ THEN REGIN “PUSH TOWARD RIGHT E9GE" 
YL © Y1eC VV OCXR@X1dI/(X20K199 
XL1_e¢ xR 
ENO ELSE 
IF Ci LAND '18@ THEN BEGIN "PUSH TOWARD 9OTTOM EDGE* 
XL © XLOCX2-KXL OCYRVAIS(Y2~-¥193 
Yi + YB 
END ELSE. 
If C1 LAND °10088 THEN REGIN “PUSH TowaRD TIP EDGE" 
XL KpeCXIeKL eV THVyg I/O V2ev1)3 
Yi « yt 
ENS 


C1 © CODE(X1,Y1)3 “RECOMPUTF THE ConEe™ 
END “COMPUTES 


“IF WE REACH HERE, THE LINE FROM (Xi,¥1) TO ¢(x2,¥2) IS vISTaLEe” 
MRAWLINE (X1,¥1¢X2,Y2) 
ENDS 


& Gray $ col, 


Cobs 

t A "EE a 

ofr eko by C fr SPEE Be oy 
s 


oo tC ¢Z Ake 
o co 4 Mee | 
Lit) dlak ()ol oe 
SEONG 
port Maye M faa, (8 a 


Dvn 
p {ay (7 D tot jet 


(all FP Ape 
sls Bogue ae att M 


pre Ee 
oe: pow hn yy, CA past of S124 f eal pthr, 


Ok 


18 
29 
38 
49 
58 
68 
7@ 
8a 
98 
91 
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94 

85 

1808 
118 
128 
138 
148 
150 
168 
1728 
180 
1380 
200 
218 
228 
230 
240 
258 
268 
27e 
280 
230 
308 
318 
32e 
3e5 
330 
500 
52a 
538 


* 680 


618 
620 
700 
718 
720 
800 
818 
820 
908 
918 
920 
1089 
1019 
1820 
1038 


REM ... TEST OF THE IYAN SUTHERLAND, DAN COHEN WINDOW CLIPPING 


REM ... ALGORITHM FROM NEWMAN & SPROULL, PAGE 123 
REM ... PRINCIPLES OF INTERACTIVE COMPUTER GRAPHICS 
REM ... MCGRAW-HILL PUBLISHER. 

REM 


PRINT “Define a clipping window in cartesian coordinate space":? 
INPUT “Enter the Minimum X, Maximum X coordinates ";XL,XR 

Input “Enter the Minimum Y, Maximum Y coordinates ";YB,YT 

FOR I=1 TO 18 

INPUT “Enter a test line segment (X1,Y1 XK2,Y2) ";xX1,Y1,xX%2,Y2 
GOSUB 188 


NEXT I 

? “End of testing" 

END 

REM ... GIVEN LINE SEGMENT X1,Y1 X2,Ye2 

REM ... CLIP TO WINDOW XLEFT,XRIGHT YBOTTOM, YTOP 

REM ... PASS END POINTS TO FOUR BIT CODE GENERATOR s 
X=X1: Y=Y1: GOSUB 1008 

C1=CODE 

X=Xe: Y=Ye: GOSUB 19028 

Ce=CODE 

REM ... IF C1 & C2 = @ THEN LINE IS INSIDE VISABLE WINDOW 
IF (Ct=@) AND (C2=0) THEN 302 

REM ... FURTHER TESTING IS REQUIRED 

REM ... USE “CODE" TO SEE IF LINE MISSES WINDOW ENTIRELY 


BOX=(C1 AND C2) 

IF BOX=@ THEN 328 

IF Ci<>@ THEN 250 

SWAP C1,C2: SWAP X1,X2: SWAP Y1,Y2 


REM ... BRANCH TO PROPER EDGE INTERPOLATION/CLIPPING ROUTINE 
ON C1 GOSUB 500,608, 900, 700, 900, 909, 900, 800 

REM ... NOW SEE IF NEW END PUTS BOTH ENDS IN WINDOW 

X=X1: Y=Y¥1: GOSUB 1000: C1=CODE 

GOTO 18@ : REM ... SEE IF MORE CLIPPING IS REQUIRED 

REM ... THE LINE FROM X1,Y1 TO X2@,Y2 IS INSIDE 

REM ... OR CLIPPED TO WINDOW EDGES. 

REM ... PUT CODE HERE TO DRAW FROM X1,Y1 TO X2,Y2 <----<<< 
PRINT “The resulting line segment is "; X1;Y1;" TO “;Y1t;Ye2 
RETURN 

REM ... PUSH TOWARD LEFT EDGE 

IF (C1 AND 1) THEN Yt=¥1+CY2-Y1 Je CXL-X1)/0X2-X1): X1=XL 
RETURN 

REM ... PUSH TOWARD RIGHT EDGE 


IF (Ci AND 2) THEN Y1=¥1+(Y2-Y1)#(XR-X1)/(X2-X1): X1=XR 
RETURN 

REM ... PUSH TOWARD BOTTOM EDGE 

IF (C1 AND 4) THEN X1=X1+(X2-xX1)#(YB-Y1I/0Y2-Y1): Y1=YB 
RETURN 

REM ... PUSH TOWARD TOP EDGE 

IF (C1 AND 8) THEN X1=X1+(X2-xX1)#CYT-Y1I/4(0VY2-Y1)! Y1=YT 
RETURN 


REM ... BAD LOGIC 

? “ERROR (CLIPPING) “;CHR$(7) 

RETURN 

REM ... FIND SUTHERLAND-COHEN CLIPPING CODE 


IF X<XL THEN CODE=1 ELSE IF X>xR THEN CODE=2 ELSE CODE=@ 
IF Y<YB THEN CODE=CODE+4 ELSE IF Y>YT THEN CODE=CODE+8 
RETURN 


POLY-Viy 
#PY449 


K&M Company 
TORRANCE,CA 90503 


ee} 


o 


Vee eee ae Gea ee —o""“SIGMUG vol. 224 
SIG/MVOL224 OK 

SMALC1 LBR 75K 

SMALC2 LBR 75K 

SMALC3 LBR 63K 

SMALLC CAT 2K 

5 file(s). 

48 directory entries remaining. 

C>STAT O: 


Bytes Remaining On O: 26k 


1271 


CTYPE SIG/MVOL.224 emtY see —CAILEE 224 sh SMALC! LOR 


C>TYPE SMALLC.CAT 


0765 


This is the catalog for the CIS version of SIG/M disk 224 which contains 
the floating point small c files. The disk has been divided into three 
library files named SMALC?.LBR. The first library contains the Compiler, 
Assembler, Linker, and Doc files. The second and third libraries contain 
the source code, USQ.COM to unsqeeze the files and CRC.COM to do a CRC 
check using the non-standard SIG/M CRC. This is a 280 system. 


Directory for SMALC1.LBR actual size of file is 74K 


-CATALOG. 224 4k | ARGS -DQC 2k I CC -CQM 
FLOAT ~DOC 4k | IOLIB -DOC 4k | PRINTF .DOC 
TEST ~cQ 4k | TRANSCEN.DOC 2k | ZLINK -CQM 
ZMAC -COQM 10k | ZMAC -DQC 8k 

Directory for SMALC2.LBR actual size of file is 76K 
ARGS -CQ 4k | ARGS .H 2k | ARGS -OOT 
c80V-2 .CcQ 22k | CLIBV -OBJ 4k | FLOAT -CQ 
FLOAT -OBJ 4k 

Directory for SMALC3.LBR actual size of file is 64K 
CRC ~COM 4k | IOLIB -CQ 12k [| IOLIB eH 
PRINTF1 .CQ 4k | PRINTF1 .H 2k | PRINTF1 .OQJ 
PRINTF2 .H 2k | PRINTF2 .0QJ 12k | PROFILE .AQM 
PROFILE .OBJ 2k | TRANSCEN.CQ 8k | TRANSCEN.H 
USQ - COM 2k 
fend of file] 
C> 


seine elena sisi 


-_. 


24k 


4k 
6k 


4k 


16k 


2k 
6k 
4k 
2k 


- on nna pte a neh an oe etn ne seen winarae 


cc 
PROFILE .DQC 


ZLINK  .DOQC 
C80V -cQ 
FLOAT .H 
IOLIB .0QJ 
PRINTF2 .COQ 
PROFILE .H 
TRANSCEN . OBJ 


10k 
2k 
2k 


28k 
2k 


6k 
6k 
2k 
6k 


TYPE -CATALOG,. 224 


SIG/M Volume 224 Small C Compiler with Floating Point (280) 
-~CATALOG. 224 contents of SIG/M Volume 224 
released April 19, 1985 
JOIN -ACG Amateur Computer Group Application Form 
SIG-M - LIB donation form 
CRC .~COM checksum program 
usQ . COM unsqueezes squeezed files 
index name size ere description 
224.01 CC -CQM 23K CF 1F £80 Small C compiler with 
224.02 CC -DQC 10K 8C 57 floating point math 
224.03 C80V CQ 27K 48 39 / 
224.04 C80V-2 .CQ 21K EB BC / 
224.05 ARGS CQ 3K 47 7F 1/0 direction and command 
224.06 ARGS -DQC 2K 24 BC line parsing 
224.07 ARGS 3 1K 3E 33 
224.08 ARGS -OQT 3K 40 4E / 
224.09 CLIBV OBJ 4K C9 EB alternate math & I/O library 
224.10 FLOAT cQ 15K C9 EE floating point routines 
224.11 FLOAT ~DQC 3K 04 D9 / 
224.12 FLOAT | 1K 21 05 / 
224.13 FLOAT OBJ 3K 95 62 / 
224.14 IOLIB CQ 11K FA 82 integer math and I/O 
224.15 IOLIB -DQC 3K D1 C8 / 
224.16 IOLIB -H 1K OE 62 / 
224.17 IOLIB 007 6K 1E 5E / 
224.18 PRINTF .DQC 3K 66 D2 formatted 1/0 
224.19 PRINTF1 .CQ 3K 70 E9 / 
224.20 PRINTF1 .H 1K 31 61 / 
224.21 PRINTF1 .0QJ 6K 6D D9 / 
224.22 PRINTF2 .CQ 6K 63 1F / 
224.23 PRINTF2 .H 1K AB C9 / 
224.24 PRINTF2 .0QJ 11K B5 AF / 
224.25 PROFILE .AQM 3K FB FB execution profile and walkback 
224.26 PROFILE .DQC 2K A6 03 / 
224.27 PROFILE .H 1K El 03 / 
224.28 PROFILE .OBJ 1K 86 OA / 
224.29 TEST CQ 3K El 62 sample program 
224.30 TRANSCEN.CQ 7K 9A 8C transcendental functions 
224.31 TRANSCEN.DQC 2K A9 B2 / 
224.32 TRANSCEN.H 1K BF OF / 
224.33  TRANSCEN.OBJ 5K 54 EB / 
224.34 ZLINK ~CQOM 6K. E117 linkage editor 
224.35 ZLINK -DQC 2K 64 8A / 
224.36 ZMAC ~CQM 10K 08 83 assembler (relocatable output) 


224.37 


ZMAC -DQC 


B71 / 
SIG-M Library -CATALOG Volume Number-224, 37 Files cataloged. 


1985 by Sig/M-Amateur Computer Group of New Jersey Inc. 


right (c) 
Goprs P.O. Box 97, Iselin, NJ 08830 USA 
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2PE CC.DOC 
C Compiler Documentation 


INTRODUCTION 


This compiler is the small C compiler written 


by Ron 


Cain and published in Dr. Dobb's #45 (May '80). The compiler 
Wewas modified to include floating point by James R. Van Zandt. 
The floating point routines themselves were written by Niel 
Colvin. The companion assembler ZMAC and linker ZLINK were 


written by Bruce Mallett. 


This compiler accepts a subset of standard C. 
requires a Z-80 processor. It reads C source code and 
Zilog~- mnemonic assembly language output, with syntax 
the assembler ZMAC supplied with it. 2ZMAC produces a 
relocatable file with the extension .OBJ. One or more 


It 
produces 
matching 


such 


relocatable files can be linkage edited by the companion 
program ZLINK. The compiler (with source in C), the assembler, 
and the linker (with sources in assembly language) are hereby 


Placed in the public domain. 


There are several sample source code files on 


this 


disk. For more about the C programming language, see the above 
issue of Dr. Dobb's or "The C Programming Language" by B. W. 


Kernighan and D. M. Ritchie, Englewood Cliffs, N.J.: 
Prentice-Hall, 1978. 


DATA TYPES 


The data types are... 


char c character 

char *c pointer to character 

char c[3]; character array 

int i; 16 bit integer 

int *i; pointer to integer 

int i0; function returning integer 
int if4}; integer array 

double d; 48 bit floating point 
double *d; pointer to double 

double d(); function returning double 
double d{5]; array of doubles 


Storage classes, structures, multidimensional arrays, unions, 
and more complex types like "int **i" are not included. 


PRIMARIES 


arraylexpression] 
function(argl,arg2,...,argn) 
constant 

decimal integer 


decimal floating point (1.0, 2., .3, 340.2e-8) 


quoted string ("sample string") 
primed character ('a' or '2Z') 
local variable 
global variable 


Each variable must be declared before it is used. 


UNARY INTEGER OPERATORS 


pa minus 


7 indirection 
& address of 
++ increment, either prefix or suffix 


as decrement, either prefix or suffix 


@inary ryrecer OPERATORS 


addition 

subtraction 
multiplication 
division 

mod, remainder from division 
inclusive or 

exclusive or 

logical and 

equal 

not equal 

less than 

less than or equal 
greater than 

greater than or equal 
left shift 

arithmetic right shift 
assignment 
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UNARY DOUBLE OPERATORS 


- minus 


Oa rnary DOUBLE OPERATORS 


add 
subtract 
multiply 
divide 
assignment 


YN et + 


Assignment operators are not included. 


Conversion between floating point and integer is automatic for 
assignment and for the expression returned by a function. 
Conversion from integer to floating point is automatic for the 
arguments of any of the floating point operators. Otherwise, 
the routines "float(jj)" and "ifix(yy)" (as in FORTRAN) may be 
used. The arguments of integer-only operators are checked to 
be sure they are integers. There is no type checking for the 
actual parameters of function calls. 


PROGRAM CONTROL 


if (expression) statement; 
if(expression) statement; else statement; 
while(expression) statement; 

Co break; 

: continue; 
return; 
return expression; 
; 7* null statement */ 
{statement;statement; wae statement; } 
/* compound statement */ 


eR 


“tye ancluded: for, do while, Switch, case, default, goto 


COMMAND LINES 


When the compiler is run, it reads one or more C source files 
and produces one assembly language file. The assembly language 

Oifiles are separately aSsembled by ZMAC, then are combined into 
a single executable file by ZLINK. The format of the compiler 
command line is: 


cc [options] file [file file...] 
Each option is a minus sign followed by a letter: 


-C to include the C source code as comments in 
the compiler-generated assembly code. 


-E pause after an error is encountered. 
-G don't reserve space for any global variables. 
-M none of these files contains main(). 
-P produce profile of function calls, and enable 


walkback trace on calls to err(). 


Use the -G option if all global variables are being declared in 
one compilation, but will be used by programs being compiled 
and assembled separately. (This is a rudimentary form of 
"extern".) If functions return doubles, they must be declared 
before use in each compilation. Otherwise, functions are 

erp alae imported and exported. Names of functions and 
global variables i.e., those declared outside function 
definitions) are always global as far as the linker are 
concerned, and may not overlap. 


The -M option keeps the compiler from producing its standard 
header (initializing the stack pointer, for example). The 
header does not include an ORG 100H directive, since ZLINK 
automatically starts programs at 100H. As a result, forgetting 
the -M option will lengthen your program by a few bytes but 
cause no other harm. 


The profile printout will include only the functions in the 
first file the linker sees. That's the one that should be 
compiled with the -P option. If there is a call to err() in 

' JOLIB, a "walkback trace" is printed, which lists all the 
functions that have been called but which have not yet returned 
(recursive calls lead to multiple listings). The walkback trace 
will include all functions compiled with the -P option, whether 
or not they were in the first .OBJ file. 


Options and files are separated by spaces, and can be mentioned 
in any order (even intermixed). Only the file name (optionally 
preceded by a disk name) should be given. The compiler 
automatically adds the extension ".C". The output file is given 
the same name (and is put onto the same disk) as the first 

@ input file, but with the extension ".ASM", 


Each assembly language file is assembled as follows: 
zmac alpha=alpha 


If extensions are not specified, as here, ZMAC uses ".ASM" for 
its input file and ".OBJ" for its output file. 


The object files are linked as follows: 


Zlink alpha,alpha=alpha,beta,iolib,float,printf 


The first name is for the output file. By default, it is given 
the extension ".COM". The second name is for the map file 
(default extension ".MAP) which gives the values of all the 
global symbols. ZLINK will always tell you how many global 


Symbols 
symbols 


were undefined, but won't tell you what the undefined 
were unless you ask for a map file. All the names to 


the right of the '=' are input files, with the default 
extension ".OBJ". The first input file must have been compiled 


WITHOUT 
main(). 


the -M option. Ordinarily, it will be the one with 
The other files can be mentioned in any order. 


EMBEDDED COMPILER COMMANDS 


"name" i 


#define name string 
s replaced by "string" hereafter. 


#include filename 


compiler gets source code from another file (can't be nested) 


#asm 


#endasm 


on between these is passed directly to the assembler. 


LIBRARY FILES 


Seven library files are included: 


IOLIB.C Basic input/output and integer math routines 

IOLIB.ASM (required by ALL programs). 

IOLIB.H / 

FLOAT.C Floating point math routines. 

FLOAT .OBJ / 

FLOAT.H / 

TRANSCEN.OBJ Trancendental routines. 

TRANSCEN.H / 

PRINTF1.C Output routine printf(), integer only. 

PRINTF1.OBJ / 

PRINTF1.H / 

PRINTF2.C Output routine printf(), 

PRINTF 2.OBJ integer & floating point 

PRINTF2.H / 

PROFILE.ASM Prints profile (number of calls to each 

PROFILE.OBJ function) after program finishes, and enables 

PROFILE.H walkback trace in case of error (calls to 
err(), in IOLIB). 

ARGS.C I/O redirection and command line parsing. 

ARGS.OBJ 


»>'S HH 


/ 


These are related as follows: 


IOLIB 
/ tN N 
PRINTF1 | \ ARGS 
PROFILE \ 
° FLOAT 
/ \ 
PRINTF2 TRANSCEN 


That is, PRINTF2 requires both FLOAT and IOLIB. PRINTF] or 


PROFILE require only IOLIB. TRANSCEN requires both FLOAT and 
IOLIB. 


In each case, the .C file was compiled and assembled to give 
the corresponding .OBJ file, and the .H file declares (for the 
assembler, and if necessary for the compiler as well) the 
exported symbols. 


Each library to be used must be mentioned twice: once to the 
compiler (either in an #include statement in the source code or 
in a reply to the "input file" question), and again to the 
linker (either in the command line or in a reply to the linker 
prompt). For example, if floating point operations are needed, 
the source file should contain: 


#include iolib.h 

#include float.h 

double x; 

sere (rest of source code) 


oe assembly, and linking would consist of: 


A>cc alpha 
A>zmac alpha=alpha 
A>zlink alpha=alpha,iolib,float 


For details on these libraries, see IOLIB.DOC, FLOAT.DOC, 
TRANSCEN.DOC, PRINTF.DOC, PROFILE.DOC, and ARGS.DOC. 


SAMPLE COMPILATION 
C>oce test 
* * * Small1-C V1.2 * * * 


By Ron Cain and James Van Zandt 


29 July 1984 


TEST.C <file names echoed> 


#include iolib.h <included files echoed> 
#end include 
#include float.h 
re] #end include 
#tinclude printf2.h 
#end include 
#include args.h 
#end include 
#include transcen.h 
#end include 
sese== main() <function names echoed> 


out ( 
alpha () 
beta () 
gamma () 
putnum() 
eeress out () 


uuu 
Huu 


There were 0 errors in compilation. 


C>zmac test=test 
¥ SSD RELOCATING (AND EVENTUALLY MACRO) 280 ASSEMBLER 
ER 1.07 


0 ERRORS 
C>zlink 
test,test=test,a:args,iolib,float,printf2,a:transcen 
SSD LINKAGE EDITOR VERSION 1.4 
0 UNDEFINED SYMBOL(S). 
Cc> 


SAMPLE COMPILER COMPILATION 


C>cce c80v 
C>zmac c80v3=c80V <pick a different name> 
C>zglink c80v3,c80v3=c80v3,iolib,float <link it> 


The assembly files total about 190K. The object files total 
about 65K, and the temporary file produced by the linker is 
about 80K. Compilation requires about 43K of RAM, divided as 
follows: 34K code & data, 8K heap (mostly symbol table), and 1K 
stack. 


PERFORMANCE 


The program test.c on this disk (with 142 lines and 3200 bytes) 
was compiled in 47.8 sec on a 4 MHz 2-80, for a compilation 
speed of approximately 3 lines/sec, or 67 bytes/sec. Of this 
time, approximately 7 seconds was spent reading in the 43136 
bytes of compiler code. 


The following floating point benchmark (from Dr. Dobb's 
Journal, Mar 84) finished in 489 seconds on a 4 MHz 2-80, with 
the result 2500.00469: 


#include iolib.h 
#include float.h 
#include transcen.h 
#include printf2.h 


int i; 
double a; 
main () 
{ a=l.; i=l; 
printf ("starting\n") ; 
while (it++<2500) 
fa=tan(atan(exp(In(sqrt(a*a)))))+1.7} 
: printf("Result is $20.12f ",a); 


INTERNAL DOCUMENTATION 


This is a recursive descent, one pass compiler producing 
assembly language. The two major changes that have been made cc 
- @ eed it u» relative to Ron Cain's oriainal comoiler are a G 


-aSn coded symbol table and 1K disk buffers. 


Global symbols defined in a C program are prefixed by 'Q' so 
they do not conflict with any global symbols in libraries. 


A compiled program has the following layout... 


100H to _end-1 program & data 
—end to *heaptop heap 

*heaptop to *SP-1 unused 

*SP to *(0006) stack 


The symbol _end is defined by ZLINK at link time, and points to 
the first byte above program and data. The variable heaptop 
(initialized to _end) always points to the first byte above the 
heap. The stack pointer register SP is initialized to the 
first location above user memory (pointed to by the word at 
0006). The variable names _end and heaptop are visible only to 
assembly language programs, since they do not begin with Qs. 


Assembly language programs can be called by C programs. The C 
program will evaluate each of its arguments (left to right), 
push it onto the stack, then call the named program. Therefore, 
the assembly language program should expect that the top word 
on the stack is the return address, the next word is the last 
argument, etc. If the function is to return an integer or 
character value, it should be left in the HL register. Double 
values should be left in the 6 byte area starting at FA. 


WARNINGS 


In addition to the limitations mentioned above, the user should 
be aware of the following... 


In declaring a function returning a double, you have to use two 
lines... 


double frodo(); 
frodo(x,y,z) int x; double y,z; 


You can't combine them, as in standard C... 
double frodo(x,;y,z) ... /7* not accepted */ 


It addition, the declaration "double frodo();" must appear 
before any use of the function, or the compiler will assume 
while generating the calling code that the function returns an 
integer. 


The floating point routines in the FLOAT library (though none 
of the code produced by the compiler) use several of the 
undocumented 2-80 op codes, so they may not work on some 
processors. FLOAT also uses the alternate register set. 


The floating point routines do not meet the proposed IEEE 
standard. 


POTENTIAL IMPROVEMENTS 
Adding the features noted above as "not included". 
The compiler could probably be made faster by tokenizing the 


input stream, so parsing would not involve string comparisons. 
tt could be made smaller by moving the error messages to a disk 


+isa€, to be consulted at need. Implementing storage class 
Specifiers could make compiled programs (and the compiler 
itself) smaller and faster, since variables local to a function 
that is not called recursively could be declared "static". 
Static variables can be accessed much more readily than "auto" 
variables (those on the stack). 


CTYPE IOLIB.DOC 
IOLIB Library Documentation 


IOLIB defines all the arithmetic operations, and the following 
I/O, heap management, and error reporting functions: 


FUNCTIONS 


cpm(bc,de) int bc,de; 
The registers BC and DE are set to the values of the 
corresponding arguments, and a BDOS service request 
(CALL to 5) is made. The value returned is the contents 
of A (sign extended). 

getchar () 
Echoes and returns one character from the standard 
input, which is initially the keyboard but can be 
redirected by setargs() in the ARGS library. 

putchar(c) char c; 
displays one character on the standard output, which is 
initially the console but can be redirected by setargs() 
in the ARGS library. Adds LF after CR. Returns c. 

gets(buf) char buf[80]; 
Gets a null-terminated string from the standard input. 
If I/O has not been redirected, the string comes from 
the keyboard and standard CP/M editing is permitted. The 
maximum length of the string is fixed at 80 characters. 

puts(s) char *s; 
Displays a null-terminated string on the standard 
output, using putchar(). 

fopen(name,mode) char *name,*mode; 
Opens file "name". "mode" is a pointer to a single 
character (either upper or lower case): "r" for read 
access, "w" for write access, and "a" for appending to 
an existing file. fopen returns a unit number (int) 
which must be used for subsequent file accesses. 
For example... 


u=fopen("frodo.c","r") opens FRODO.C for reading 


character=getc(u) gets a character from FRODO.C 
u=fopen("sam.c","W") opens SAM.C for writing 
putc (character ,u) writes a character to SAM.C 


Up to three files may be open at once. (If more are 
needed, change NBUFS and BUFLGH in IOLIB.C, compile, 
and assemble.) 

fclose(u) int u; 
Closes the file with the unit number u. 

getc(u) int u; 
Returns the next character from the file (not sign 
extended), or -1 at end of file. Line feeds are 


r*] discarded, and control Z (1AH) signals end of file. 
getb(u) 


int u; 
Return next byte from file (not sign extended), without 
regard to its value, or -1 if at end of file. (Use this 
one to read a COM file.) 

putc(c,u) char c; int u; 
Write character c to a file. If it is a carriage 
return, write a line feed as well. Returns c. 


2 tb IVC,U) Char Cc; int u; 
Write byte c to a file, without special handling of 
Carriage return. 

fflush(u) int u; 
Flush buffer for unit u (which must be an output 
file) to disk. Called automatically by fclose(). 


O ariocin) int n; 
- Returns a pointer to a block of n bytes of memory 
(no error checking). 
free(ptr) char *ptr; 
ptr should be one of the pointers returned by alloc. 
That block AND ALL BLOCKS ALLOCATED SINCE THEN are 
returned to the heap. 
avail () 
Returns the number of bytes of memory available for 
the heap AND THE STACK. If you allocate all of it 
and write over the stack, you will cause trouble. 
The safe way to get a big buffer is as follows: 
size=avail()-300; 
where=alloc(size) ; 
/* initialize if needed... */ 
i=0; while(i<size) {fwhere[il]=0;} 


err(s) char *s; 
Prints "\nERROR" and the message pointed to by s on 
the console, and (if enabled during compilation) 
performs a walkback trace. For example, fopen uses 
the call: 
err("OUT OF DISK BUFFERS") ; 

The walkback trace lists the functions that have 
been called but have not yet returned, with the 

r+) most recently called function first. Any functions 
compiled without the "profile and trace" option 
simply don't appear in the list. 


upper(c) char c; 
If c is a lower case character, converts it to upper 
case. Otherwise, it returns c. 


POTENTIAL IMPROVEMENTS 
Allocate buffers from the heap only when they are 
needed (would permit more disk buffers without 
penalizing programs that didn't use them). 
alloc() and free() should permit blocks of memory to be 
allocated and freed in any order. 


AUTHOR 
James R. Van Zandt 
27 Spencer Dr. 
Nashua NH 03062 
603-888-2272 


C>TYPE FLOAT.DOC 
FLOAT Library Documentation 


Qruoat contains the floating point arithmetic routines, and some 
functions visible to the user's program. 
GENERAL INFORMATION 


These routines will execute only on a 7-80. They use the 
alternate registers and some of the undocumented instructions 


cc 


’~ tat processor. They dao not contorm to tne IEEE ..soating 
Point standard. The routines were written by Neil Colvin, and 
are worth study. They are the best code I have ever seen for 


the 2-80. - Jim Van Zandt 


FLOATING POINT FORMAT 


Each floating point number is 6 bytes long, and consists of a 
40 bit fraction (most significant byte in the highest address) 
and an 8 bit exponent. For nonzero numbers, the fraction f has 
a value in the range 0.5 <= £ < 1.0. Since its most significant 
bit would always be 1, it would carry no information and is 
replaced by the sign bit (set for a negative number). The 
exponent is 80H if the number is in the range 0.5 <= x < 1.0, 
and is increased by 1 for each place the binary point of f 
should be moved to the right. For example: 


Representation Number 
00h,00h,00h,00h,00h, 80h 0.5 

00h,00h,00h,00h, 80h, 80h ~0.5 
00h,00h,00h,00h,00h,8ih 1.0 
00h,00h,00h,00h,00h,7fh 0.25 
Ofah,33h,0£3h,04h,035h,80h sgqrt(.5) = .707106... 
38h,0a9h,0d8h,5bh,5eh,7fh 1/log(10) = .43429... 
21h,0a2h,0dah,0fh, 49h, 81ih pi/2 = 1.5707... 


ARITHMETIC OPERATIONS 


Each of the primary operations (DADD, DSUB, DMUL, and DDIV) 
takes its first operand from the stack (under the return 
address) and the second from the fixed location FA (for 
Floating point Accumulator). The result of the operation is 
left in FA. For example, we have the following C expression and 
its translation into calls to floating point operations: 


;double a,b,c,d; 

smain() 

QMAIN: 

aA a=b+c/d; 
LD HL,QB 
CALL DLOAD 
CALL DPUSH 
LD HL,QC 
CALL DLOAD 
CALL DPUSH 
LD HL,QD 
CALL DLOAD 
CALL DDIV 
CALL DADD 
LD HL,QA 
CALL DSTORE 


RET 
QA: DS 6 
QB: DS 6 


Qc: DS 6 
QD: DS 6 


FUNCTIONS 


7get address of lst operand 
;put operand in FA 

;move from FA to stack 

;put 2nd operand... 


fee.On Stack 
;put D in FA 
;find c/d 
3find b+c/d 


sload destination address 
;save result 


;declare storage space 


cet 


Each of these functions return a double: 10 


Va ‘\xX. 7 double x}; integer to floating point conversion 
fmod(x,y); double x,y; mod(x,y) 
if 0 < y then 0 <= mod(x,y) < y and 
x = n*y + mod(x,y) for some integer n 


fabs(x); double x; absolute value 

floor(x); double x; largest integer not greater than 
ceil(x); double x; smallest integer not less than 
rand(); random number in range 0...1 


This function returns an int: 


int ifix(x); double x; floating point to integer 
(takes floor first) 


C>TYPE TRANSCEN.DOC 
FLOAT Library User's Documentation 


TRANSCEN supplies certain transcendental functions. They give 
at least 11 significant digits in all known cases. 


FUNCTIONS 
sqrt(x); square root 
exp(x); exponential 
log(x); natural logarithm 
1og10(x); log base 10 
pow(x,y); pow(x,;y) = x**y 
atan(x); arc tangent 
(value in range -pi/2 to pi/2) 
atan2(x,y); arc tangent of x/y 
(value in range -pi to pi) 
O costx) ; cosine 
sin(x); sine 
tan (x); tangent 
cosh(x hyperbolic cosine 


3 
sinh(x); hyperbolic sine 
?; hyperbolic tangent 


In each case, the arguments and the value returned are doubles. 


INTERNAL DOCUMENTATION 


The square root is calculated by the Newton-Raphson method. The 
hyperbolic functions are calculated in terms of the exponential. 
The other functions are calculated by means of power series 
after range reduction. 


POTENTIAL IMPROVEMENTS 
Inverse hyperbolics, gamma, and zeta (among others) could be added. 


The hyperbolic functions sinh() and tanh() would be more accurate near zero if 
“uy were defined by their own power series. 


O, orsor 


sqrt, atan2, cosh, sinh, and tanh (the easy ones) were written 
py J. R. Van Zandt, and the others by Neil Colvin. 


C>TYPE PRINTF.DOC 
PRINTF Library Documentation in 


PRINTF2 Supplies formatted output like that described by 
Kernighan and Richie. Input conversion routines utoi (for 
Unsigned integers) and atof (for floating point numbers) are 
also supplied. PRINTF1 is identical except that formats 'f' 


and ‘e', 


of printf, and functions ftoe, ftoa, and atof, are 


missing. Thus, PRINTF2 requires FLOAT while PRINTF1 does not 
require it. 


FUNCTIONS 


printf(controlstring, arg, arg, ...) -- formatted print 


itod(n, 


"controlstring" is a string which can contain any of 
the following format codes: 


$d decimal integer 

Su unsigned decimal integer 

SX hexidecimal integer 

$C ASCII character 

$s null-terminated ASCII string 

S£ fixed point conversion for double 

ge floating point conversion for double 
For each format code, there is an "arg" - a pointer to 


an object of that type. Between the '%' and the format 
code letter field specification may appear. For formats 
'f' and 'e', the specification consists of two integers 
separated by a period. The first specifies the minimum 
field width, and the second the number of digits to be 
printed after the decimal point. For all other formats, 
the specification consists only of the one integer 
giving the minimum field width. If there is no field 
specification, the item is printed in no more space 
than is necessary. 


Example ‘ Output 
printf(" decimal: %@d ",15+2) decimal: 17 
printf£(" unsigned: %u ",-1) unsigned: 65535 
printf(" hexidecimal: %x ",-1) hexidecimal: FFFF 
printf(" string: ¢s ","hello") string: hello 
printf£(" character: %c ",65) character: A 
print£(" fixed: ¢f ",1./7.) fixed: .142857 


printf(" exponent: $8.5e ",1./7.) exponent: 1.42857e-1 


str, sz) int n; char str[]; int sz; 

convert n to signed decimal string of width sz, 
right adjusted, blank filled; returns str 

if sz > 0 terminate with null byte 

if sz = 0 find end of string 

if sz < 0 use last byte for data 


jtou(nbr, str, sz) int nbr; char str[]; int sz; 


itox(n, 


ftoa(x,f 


convert nbr to unsigned decimal string of width sz, 
right adjusted, blank filled; returns str 

if sz > 0 terminate with null byte 

if sz = 0 find end of string 

if sz < 0 use last byte for data 


str, sz) int n; char str[]; int sa; 

converts n to hex string of length sz, right adjusted 
and blank filled, returns str 

if sz > 0 terminate with null byte 

if sz = 0 find end of string 

if sz < 0 use last byte for data 


7Str) double x; int £; char *str; 
converts x to fixed point string with f digits after 
kin Teac’ agl onin return str 


ftoe(x,f,str) double x; int £; char *str; 


converts x to floating point string with f digits after 
the decimal point, return str 


utoi(decstr, nbr) char *decstr; int *nbr; 


converts unsigned decimal ASCII string to integer 
number. Returns field size, else ERR on error. (This is 
used to interpret the specification fields.) 


atof(str) char *str; 


AUTHOR 


converts from ASCII to floating point, returns the 
double value. The general input format is 

[-] [integer] [.[fraction]]lel[-lexponent], where things 
in brackets are optional (except that either an integer 
or a fractional part must be present). 


Examples Values 
1 1. 1.0 1. 
el l.e-1 10.e-2 -Olel 0.1 


Conversion stops with the first character that doesn't 
match the above format. 


J. E. Hendrix for the original routines. J. R. 
Van Zandt for ftoa, ftoe, atof, and the floating point 
modifications in printf. 


INTERNAL DOCUMENTATION 


The method used in ftoa to convert to a decimal string 


involves more divisions than the classical method, but does not 
require that the original number be scaled down at the 
beginning. It was found that this initial scaling was causing 
loss of precision. The present algorithm should always convert 
an integer exactly if it can be represented exactly as a 
floating point number (that is, if it is less than 2**40). 


C>TYPE PROFILE.DOC 


PROFILE 


If the 


"profile and trace" option of the compiler is used, each 


call to err() results in a walkback trace of function calls. 
(Err() is in the IOLIB library. For details, see IOLIB.DOC.) In 
addition, an execution profile is displayed on the console at 
program termination (call to exit()). The profile consists of a 
list of the functions and the number of times (up to 999999) 
each was called. This is sometimes useful for debugging (to 
spot functions that are never called), but is most valuable for 
program execution time optimization. If you're trying to speed 
up a program, pay close attention to the functions that are 
called a lot of times! 


The "profile and trace" option of the compiler causes it to add 
a call to the profile printout function just before exiting to 
the operating system. The code at the beginning of the program 
then looks like this: 


° 
i 


ORG 100H simplied - ZLINK default 

LD HL, (6) 

LD SP,HL rinitialize stack 

CALL CCGO zinitialize other things 

CALL QMAIN sexecute the user's program 

LD HL,CC2 ;pointer to lst function cc 


CALL CCCALLS sprint the profile 13 


CALL QEXILT — 7@xit to operating system 


A header and two calls are also added to the code generated 
for each function. The function header contains a pointer, a 
counter, and a string with the function name. 


;trials() 
i) CC2: DW CC3. ;function pointer. Points to the 
:function pointer in the textually 
:following function, or contains a 
;zero if this is the last one. 
DB 0,0,0 ;a three byte BCD counter for the 
;number of times this function has been 


;called. (permits 999999 calls before 
poverf low.) 


CC4: DB 'trials',0 ;the function name 
QTRIALS: 
LD HL,CC4 jsave pointer to function 
PUSH HL 3; header block. 


CALL CCREGIS rregister function entry. 
;ccregis() pushes onto the stack a 
;pointer to the function that called 
;this one, and saves in CURRENT a 
7pointer to this one. 


ot z=a(x); 
LD HL,QX 
eee ;regular code. 
33 
CALL CCLEAVI zregister function return 
] 7(resets CURRENT to point to 
;the function that called this 
7one) 
POP BC ;discard the pointer added by 
7ccregis(). 
POP BC 7discard the pointer to the 
sheader block of this function. 
RET 


Note that this method permits a walkback trace even in the 
presence of recursive function calls. 


C>TYPE ARGS.DOC 
ARGS Library Documentation 


ARGS gives the user access to the command line and optionally 
redirects the standard input and/or output. 


FUNCTIONS 


setargs() 

If access to the command line or I/O redirection is 

+] wanted, setargs() must be called BEFORE ANY DISK I/0 
IS DONE. This is because the disk operations can 
overwrite the command line. setargs() parses the 
command line, which is a series of items separated by 
one or more spaces. A '<' followed by a file name will 
redirect the standard input (used by getchar() and 
gets()) to that file. A '>' followed by a file name 
will similarly redirect the standard output (used bv 


putchar() and puts()). It the file exists, it will be 
Silently deleted. '>>' followed by a file name will 
also redirect the standard output, but if the file 
already exists then the new characters will be appended 
to the existing data. In any of the above cases, one 
Or more spaces can appear before the file name. Items 
other than the above are saved for later access by 
getarg(). As far as getarg() is concerned, I/0 
redirection commands are invisible. Regardless of I/0 
redirection, err() will always display its message and 
walkback trace (if any) on the console, putc(c,l) or 
putc(c,STDERR) will always send the character c to 
the console, and getc(0) will always get a character 
from the keyboard. 

getarg(n,s,size) int n; char *s; int size; 
places in s the n-th argument. Returns s if successful 
or, if there was no n-th argument, returns -l1. Assumes 
s has "size" bytes. The O-th argument, which under Unix 
would be the name by which the program was invoked, is 
always "*", 


INTERNAL DOCUMENTATION 


setargs() uses alloc() to allocate its buffer. 


AUTHOR 


These programs were written by Jan-Henrik Johansson 
(Dr. Dobb's Journal no 74 p 62) and extensively 
rewritten by J. R. Van Zandt 


0. 


cc 
{5 


sir s 2MAC.DOC 


NAME 
zmac - relocating Z-80 assembler 
SYNOPSIS 
zmac relfile,listfile=asmfile 
@pescrrprion 


ZMAC is a Zilog mnemonic assembler with command and language 
Syntax similar to DEC assemblers. "relfile" is the object file 
name, with the default extension ".OBJ" (for the format, see 
OBJ.DOC). "listfile" is the listing file, with the default 
extension ".PRN"., In addition to standard disk files, you can 
Specify "LST:" for the list device or "CON:" for the console. 
"asmfile" is the input assembly language file, with the default 
extension ".ASM", The output files are both optional, so that 


zmac frodo=frodo 
reads FRODO.ASM and creates FRODO.OBJ, while 

zmac ,frodo=frodo 
creates only FRODO.PRN, and 

zmac frodo,frodo=frodo 
creates both. Listing files are rarely needed except for final 
documentation, since lines with syntax errors are automatically 
listed to the console. 

6: ZMAC is called with no arguments, it will obey multiple 

commands of the above format, prompting for each with "ZMAC>". 


Operating this way saves time, since the assembler gets read in 
only once. An empty command line terminates the input. 


INPUT LANGUAGE 


The language accepted by ZMAC is like that for the Zilog 
assembler, with a few exceptions... 


ZMAC does not require the "-$" after relative jump arguments. 
The standard and ZMAC syntaxes are as follows: 


standard: JR SOMEWHERE-$ 
ZMAC: JR SOMEWHERE . 


For equates, the syntaxes are: 


standard: BELL EQU 74H 
ZMAC: BELL = 7H. 


A colon is forbidden after an equated symbol, but both a colon 
and whitespace (space, tab, or carriage return) are required 
after a label. 


Qsymbois defined in the current module which are to be 
referenced in other modules (exported symbols), or those 
referenced in the current module but defined elsewhere 
(imported symbols) must be declared GLOBAL: 

GLOBAL WARFARE 


the ORG directive is illegal. There is instead the AORG 


‘ apsolute ORG") to set the program counter to a given absolute 
address. The bad news is that ZLINK has a bug in its handling 
Of AORG. If one module has an AORG, then the NEXT module can't 
Correctly import symbols. The good news is that an AORG is 
hardly ever necessary. ZLINK starts the code at 100H by 
default. There is also an RORG ("relative ORG") directive, 
which sets the program counter to a particular value with 
Orespect to the module beginning. 


Symbols and opcodes can be in either upper or lower case (no 
case distinction). A symbol may have at least 100 characters, 
and the first 16 characters are significant. In addition to the 
Standard alphabetic and numeric characters, the four characters 
"_$.%" are also permitted in symbols. A "$" by itself stands 
for the value of the program counter (the location of the first 
byte in the CURRENT machine instruction). For example, an 
infinite loop can be coded as "JP $". 


Numbers should start with a numeral, which can be zero. By 
default, the number is interpreted in decimal. The base of the 
number can be set by a letter at the end of the number: D for 
decimal, H for hex, O for octal, or B for binary. 


The assembler can evaluate quite complex expressions. 
Multiplication and division have higher precedence than 
addition or subtraction (as usual for most software, but untrue 
for the Zilog assembler). Parentheses are permitted to enforce 
a certain evaluation order, but parentheses around an entire 
expression denote indexing. 


The unary operations are: + (no operation) 
= negate (2's complement) 
r+) # 1's complement 
The binary operations are: + - * / as usual 
\ inclusive or 
& and 


EXAMPLE 
Consider the following assembly: 


C>zmac demo,demo=demo 
SSD RELOCATING (AND EVENTUALLY MACRO) Z80 ASSEMBLER VER 1.07 


0 ERRORS 
.-.-or the equivalent assembly using interactive input: 
C>zmac 


SSD RELOCATING (AND EVENTUALLY MACRO) 2%80 ASSEMBLER VER 1.07 
ZMAC>demo, demo=demo 


0 ERRORS 
ZMAC> 
re) 0 ERRORS TOTAL 
C> 


The resulting listing file DEMO.PRN is as follows: 


PAGE NO. 1 
1 ;Demonstration of ZMAC assembly language 
2 :syntax and resultino object code 


0001= 
‘0000 0700! 


‘0002 0700! 
‘0004 0cood! 


‘0006: 00 
"0007: 


‘0007: 01 
"0008: OF 
"0009: 02 
'OOOA: 03 
"QOOB: 04 


‘000C: 05 
‘0O00D: .0600 


‘OOOF: 


° 'OO1F 07 


0020? 0000 
‘0022 88 


'0023 4A6F6527 
'002C 20226861 
'003E? 00 
'OO3F 88 


0 ERRORS 


‘ 

;declare imported symbol before use 
GLOBAL OMICRON 

;declare exported symbol before definition 
GLOBAL ALPHA 


‘ 
;Equal sign rather than "EQU", 


sand colon is illegal 
ONE = 1 
susing local symbol 
DW SIGMA 
slower case is synonymous 
dw sigma 
DW MU 
;both colon and whitespace (blank, tab, 


3or CRLF) are required after label 
ALPHA: DB 0 

SIGMA: 

susing "extended alphabet" 

;in symbol names 


_BETA: DB 1 

BE_TA: DB 15 
~GAMMA: DB 2 
SDELTA: DB 3 
SEPSILON: DB 4 

: "EF" is optional 
MU: DEFB 5 

NU: DEFW 6 

‘ 

RHO: DS 16 


+precedence used in 
;evaluating expressions 


DB 14+2*3 
DW OMICRON 
DB 88H 


7Single or double quotes around string 
;(double either to insert into string) 


DB 'Joe''s mom' 

db " ""hates"" chocolate" 
DB OMEGA 

DB 88H 


;declare exported symbol after definition 
GLOBAL RHO 

;declare imported symbol after use 
GLOBAL OMEGA 


PAGE NO. 1 


Addresses and data values subject to relocation are marked with 
single quotes. Imported values are marked with question marks. 


FORMAT OF .OBJ FILE 


The following information was gleaned from inspection of the 
source code of the assembler and linker, and output generated 
Ory the assembler. It didn't come from Bruce Mallett, so any 


errors aren't his fault. 


- Jim Van Zandt 


The relocatable file created by ZMAC consists of a module 
record, a series of data records, symbol records, and set 
address records, and is terminated by an end of module record. 


“Me ONG OL module record haS tne 1.Ormat: 


DB 2,0 


A module start record has the format: 


Orc: DB NEXT1-LGH1 ;# bytes in record 
DB 1 ;signals MODULE record 
DB YY ;descriptor bits (see below) 
'FREEMONT'! soptional module name 
NEXT1: 


A set address record is generated for each DEFS or DS opcode. 
It has the effect of resetting the linker's program counter. It 
has the format: 


LGH2: DB NEXT2-LGH2 37# bytes in record 
DB 2 ;signals SET ADDRESS record 
DB MY ;descriptor bits 
DW XXXX ;new value for program 

; counter 

NEXT2: 


A data record has the following format: 


LGH3: DB NEXT3~-LGH3 3# bytes in record 
DB 3 :signals DATA record 
DS 28 sone bit is set for each word 
;0f data requiring relocation. 
re] DB 23,34,17,...,1BH ;1 to 224 bytes of data. 
NEXT3: . 


A symbol record is used to import or export a global symbol. It 
has the format: 


LGH4: DB NEXT4-LGH4 7# bytes in record 
DB 4 7Signals SYMBOL record 
DB YY ;descriptor bits 
DW XXXX ;if defined here, XXXX is the value of 


the symbol. If not defined here, XXXX 
is the address requiring the symbol. 
The value of the symbol will be added 
to the word at XXXX. In either case, 
if "relocatable", then XXXX is with 
respect to the beginning of the module. 


we Se te Se we te 


DB 'GANDOLF' ;the symbol 
NEXT4: 
In the above records, the "descriptor bits" are defined as 
follows: 
bit 0 if word rather than byte 
bit 1 if defined here 
bit 2 if global rather than local 
re] bit 3 if relocatable rather than absolute 
bit 4 if value of symbol is to be shifted left 
by 3 bits. 


The "shift left 3 bits" note is used when the bit number in a 
SET, BIT, or RES instruction is an imported symbol. In those 
instructions, the bit number field is in bits 3 through 5 of a 
byte. Note that it is always characteristic of a use, never a 


*Sa2inition, of a symbol. 
The object code corresponding to the above assembly listing is: 


C>dump demo.obj 
DUMP version 00.05 


RECORD: 0 
@ 000 0301 602D 03A8 0000-0000 0000 0000 0000 ...-elsseeeseeee 
0010 0000 0000 0000 0000-0000 0000 0000 0000 ...eceseceeeeees 
0020 0007 0007 000C 0000-O10F 0203 0405 0600 ...cececcecececs 
0030 0502 OAIF 000C 0405-2000 4F4D 4943 524F ........ .OMICRO 
0040 4E0A 0404 3500 4F4D-4547 413F 0300 0000 N...>.OMEGA?.... 
0050 0000 0000 0000 0000-0000 0000 0000 0000 ..sssecesececace 
0060 0000 0000 0000 0000-0007 0000 884A 6F65 ......42+2+4-J08 
0070 2773 206D 6F6D 2022-6861 7465 7322 2063 's mom "hates" c 
RECORD: 1 
0080 686F 636F 6C61 7465-0088 OBO4 OBOA 0024 hocolate......J$ 
0090 4445 4C54 4108 0402-0100 4F4E 4508 040F DELTA.....ONE... 
QOAO OF00 5248 4FOB 040B-0900 2847 414D 4D41 ..RHO......GAMMA 
0OBO OD04 OBOB 0025 4550-5349 4C4F 4E0A 040B .....%EPSILON... 
00CO 0700 5349 474D 410A-040F 0600 414C 5048 ..SIGMA.....ALPH 
QODO 410A 040B 0800 4245-5F54 4107 040B 0COO A.....BE_TA..... 
OOEO 4D55 0704 OBOD 004E-550A 040B 0700 5F42 MU.....NU....._B 
OOFO 4554 4102 0000 0000-0000 0000 0000 0000 EBTA..........00% 


The first byte of relocation bits in the first data record 
(relative address 0005 in the file) is A8 hex, or 10101000 
binary, signifying that words beginning at bytes 0, 2, and 4 
among the following data bytes must be relocated. The last nine 
bytes displayed are extraneous, since the end of module record 
is at OOF3 and O0F4. 


o*” more information, see the source files. 


POTENTIAL IMPROVEMENTS 


Handle multiple program counters, such as one each for "code", 
"initialized data", and "uninitialized data". 


Permit "EQU" as well as "=". 
Make colons optional after either equated symbols or labels. 


Make "ORG" a synonym for "AORG". 


BUGS 
A file name can't include a '-', 
AUTHOR 

Bruce Mallett 


C>TYPE ZLINK.DOC 


NAME 
zlink - linkage editor 
o SYNOPSIS 
zlink comfile,mapfile=relfile,relfile... 
DESCRIPTION 


ZLINK is a linkage editor for programs assembled by 
ZMAC. "comfile" is the executable output file, with default 
extension "COM". "mapfile" is a listing of global symbols and 


eueir values, with default extension MAP’, The ‘“reifi.eS are 
the input files, with default extension "OBJ". The command line 
May be up to 128 bytes long. If a longer list of input files is 
needed, a "&" may be appended to the last name and ZLINK will 
Prompt for more input with "&LINK>". 
°o. output files are both optional, so that 
Zlink sam=sam 
reads SAM.OBJ and creates SAM.COM, while 
zlink ,sSam=sam 
Creates only SAM.MAP, and 
zlink sam,Sam=sam 
creates both. The map file is very convenient for reference 
while using a debugger. The destinations "CON:" and "LST:°" 
are also legal for the map file. The way to find out what 
symbols are imported and exported by an object file is to 
execute the linker and request only the map file: 
zlink ,con:=bilbo 


One of the last symbols shown will be "_END". Subtract 100H 
from its value to get the length of the executable code. 


If ZLINK is called with no arguments, it will obey multiple 
commands of the above format, prompting for each with "LINK>". 
An empty command line terminates the input. 


Ouuinx defines the symbol _END to point to the first byte after 
the program (including all code and data). 


Data areas with contents otherwise unspecified are initialized 
to zero. 


EXAMPLE 

ZLINK links itself as follows: 
C>zlink z1,zl=zlink,linkpl,linkp2,linkproc,& 
SSD LINKAGE EDITOR VERSION 1.4 
&LINK>mfsp,fsparse,gfspecs,linksadd,linkio,& 
&LINK>outmap,wrtrel,link01,1ink02,linkram 


0 UNDEFINED SYMBOL(S). 
C> 


BUGS 


If one input file comes from an assembly language file with an 
AORG directive, then the next input file doesn't correctly 
Oinvort global symbols. For details, see BUG.DOC . 


Undefined symbols aren't listed unless a MAP file was 
requested. 


POTENTIAL IMPROVEMENTS 


youd © multiple program counters, such as one each for “code", 
initialized data", and "uninitialized data". 


Eliminate the temporary file LINK.$$$ by reading the input 
files again (permitting use on smaller disk systems). 


ghee include local symbols in the MAP file. 
AUTHOR 
Bruce Mallett 
C> 


‘@) K&M Company @ 
\ TORRANCE, CA 90503 


-CATALOG235 
ABSTRACT235 
BAS ICODEDOC 


“BAS ICODEENG 


BC2 BOS 
BC2 OSB 
BC2 OST 
BCREAD AQM 
BCTEST AQM 
BCWRIT AOQM 
BCWRITE AQM 
BOKA&EI BQS 
CONVERT BQS 
CONVERT COM 
CRC COM 
DELBR COM 
DELERS BQS 
DIGIKLOKBOS 
FEESTEN BQS 
FORTH-NLLBR 
FUNCTIONDAT 
JOIN ACG 


More.. 

KALFEESTBQS 
KEYWORDSDAT 
MASSA BOS 
SIG-M LIB 
SORT BOS 
STELSELSBAS 
TANKIE BQS 
TESTBC2 BOS 
TIMER555BQS 
UITLEG1 BQS 
UITLEG2 BQS 
33 file(s). 


SIGMUG vol. 


28 directory entries remaining. 


C>PIP O: 


INVALID FORMAT: 


C>STAT O: 


Bytes Remaining On O: 


C> 


25k 


235 


10/10/86 


TYPE O:-CATALOG. 235 
SIG/M Volume 235 BASICODE Radio Communications (in Dutch) 
Netherlands Enhancements to FIG FORTH 
Software Tools of Australiz Volume 72 


-CATALOG. 235 contents of SIG/M Volume 235 


released July 19, 1985 
JOIN -ACG - Amateur Computer Group Application Form 
SIG-M - LIB donation form 
CRC ~COM checksum program : 
DELBR -COM to remove files from .LBR type DBLBR library name 
usQ -COM unsqueeze squeezed files - type USQ *.* 
index name size cre description 


235.01 ABSTRACT.235 2K 29 B6 Abstract of disk contents (in Dutch) 
235.02 BASICODE.DOC 16K B7 AC Documentation on BASICODE (in Dutch) 
235.03 BASICODE.ENG 3K B4 A7 Brief intro to BASICODE (in English) 


235.04 BC2 -BOS 2K 27 C8 "Standard" BASICODE-2 for MBASIC 
235.05 BC2 -OSB 2K 2B 1D "Osborne" BASICODE-1 for Osborne 1 
235.06 BC2 -OST 2K D8 69 "Ohio Scientific" BASICODE-2 


235.07 BCREAD .AQM 8K 75 A2 Read BASICODE-2 in from parallel port 
235.08 BCTEST .AQM 4K 77 7C Test program for BASICODE-2 port transfer 
235.09 BCWRIT .AQM 8K E7 4E Write out BASICODE-2 program, standard 
235.10 BCWRITE .AQM 8K 87 D9 Write out BASICODE program, (BASICODE-1?) 
235.11 BOKA&EI .BOS 6K 77 2E BASICODE-2 Tic Tac Toe, in Dutch 

235.12 CONVERT. .BOQS 4K FE 82 CBASIC source for BASICODE-2/MBASIC xlate # 
235.13 CONVERT .COM 13K 67 B5 Converts from BASICODE-2 to Microsoft BAS‘ 
235.14 DELERS' .BQS 10K A9 BE BASICODE-2 game of some sort, in Dutch 
235.15 DIGIKLOK.BQS 4k 82 2F BASICODE-2 on screen digital clock 
235.16 FEESTEN .BQS 4K 9D 98 BASICODE-2 shows public holidays, any yeaigl 
‘235.17 FORTH-NL.LBR 49K A3 Dl FIG FORTH 1.1 with enhancements for CP/M 
235.18 FUNCTION.DAT 1K 29 3F Used with CONVERT.COM 

235.19 KALFEEST.BOS 6K 9E A3  BASICODE-2 calendar for any month & year 
235.20 KEYWORDS.DAT 1K 88 69 Used with CONVERT.COM 

235.21 MASSA -BOS 4k 76 3E BASICODE-2 demo program, in Dutch 
235.22 SORT -BQS © 6K 68 2E BASICODE-2 sort program, in Dutch 
235.23 STELSELS.BAS 4K 64 EE BASICODE-2 solves 3 order quadratics ? 
235.24 TANKIE .BQS 6K 00 9B BASICODE-2 game, simple ASCII graphics 
235.25 TESTBC2 .BOS 4K F4 46 BASICODE-2 test/excerciser program 
235.26 TIMER555.BOS 6K B4 CA BASICODE-2 designs 555 timer circuits 
235.27 UITLEG1 .BQS 6K 6E 8E Introduction to BASICODE? (in Dutch) 
235.28 UITLEG2 .BQS 8K 22 83 See UITLEG1.BAS 

SIG-M Library - Catalog Volume-235, 28 Files cataloged. 


Copyright (c) 1985 by Sig/M-Amateur Computer Group of New Jersey Inc. 
P.O. Box 97, Iselin, NJ 08830 USA 


Cc> 


TYPE O:ABSTRACT. 235 
ABSTRACTS OF BASICCODE MATERIAL 
FROM NETHERLANDS CP/M USER GROUP VOLUME 504 


(Anyone fluent in Dutch and English is invited 
to translate this into English for the rest 
of us!) 


BAS ICODE 


BASICODE is een initiatief van (o.a.) de NOS HOBBYSCOOP en de HCC 
om tot een universeel cassette opslag systeem te komen voor BASIC 
programmas. Echter er is een veel groter toepassingsgebied, omdat 
elke tekstfile opgeslagen en gelezen kan worden in de vorm van 
BASICODE. 


Er zijn 4 programmas, voor lezen, schrijven en testen. Zoals 
gezegd, kan men deze ook voor willekeurige ASCII tekstfiles 
gebruiken. 


BCREAD , BCTEST , BCWRIT voor standerd baSicode en 
BCWRITE voor basicode forth versie 


Deze programmas kunnen met de normale DIGITAL RESEARCH assembler 
ASM geassembleerd worden. Er is geen gebruik gemaakt van 280 codes. 
De programmas zijn voldoende gedocumenteerd om modifikaties moge 
lijk te maken. 


De benodigde hardware is zeer simpel en bevat geen voeding. We 
gaan uit van de aanwezigheid van een Centronics interface poort. 
Deze wordt gebruikt, zonder verdere modifikatie of aansturingscom- 
mando's. Dit heeft tot gevolg dat het interface voor alle CP/M 
machines hetzelfde kan zijn. 


Volg de publikaties van de HCC (nieuwsbrief en bladen van de CP/M 
en Osborne gg) voor het beschikbaar komen van kabels. 


Convert.com dit programma converteerd de basicode file naar een 
file die MBASIC kan lezen 

Convert heeft Function.dat en keywords.dat nodig als files 
Convert.baS source code van convert in CB80 (CbasSic compiler ) 


BC2.BAS , BC2.0SB ,BC2.OSI aanpassing van het basicode prog aan 
de te gebruiken machine voor scherm grote,cursor aansturing ,etc. 
zie UITLEG1.BAS en UITLEG2.BAS 

TESTBC2.BAS test prog voor basicode aanpassing van uw machine 

De rest van de basic prog op schijf zijn voorbeelden in basicode 
zie ook 505 voor meer basicode prog. . 


C> 


Ptr 2 vi GbaulLubr Cons 
BASICODE 
April 8, 1985 


BASICODE is part of a system used by computer enthusiasts in the 
Netherlands, primarily to Broadcast computer programs. The 
Netherlands National Broadcasting service has a weekly computer 
Show (HOBBYSCOOP?) that includes data broadcasts on AM radio of 
BASIC programs. The idea is that you record the broadcast prgrams 
on a cassette recorder and then [oad them into your computer. 
data is broadcast at 1200 bps. 


BASICODE is a "subset" of BASIC that should allow programs 
written in the BASICODE subset to be executed on nearly any of 
the personal computers that have a Microsoft flavoured BASIC on 
them. This certainly includes things like Apples, Commodores, 
Ataris and of course CP/M and PC/MSDOS computers, and no doubt 
many, many others. So BASICODE is also a way of ensuring 
portability of BASIC programs between widely differing machines. 


This disk is volume 4 of the Netherland CP/M User Group {(CPMNL) 
collection and has the details of BASICODE-2 for CP/M computers. 
I'm not how BASICODE-2 differs from BASICODE-1. 


Unfortunately most of the information on BASICODE is in Dutch, a 
language I don't speak. I once attended a lecture at one of the 
local computer education groups on BASICODE, given by one of the 
orginal developers of it (that's the only reason I can even 
attempt this introduction]. My wife speaks Indonesioan (she 
taught it at High School) and so can at least recognise some of 
the Dutch words and that has helped also. 


It struck me at the time I first heard about it that BASICODE was 
really an idea whose time had yet to come. So in the hope that 
this material will motivate someone in the English speaking CP/M 
community to take a closer look at BASICODE and its implications, 
I am dressing this up with what little English documentation I 
can, plus an English catalogue of sorts. 


If you can provide translations of any of the Dutch language 
material or other support material on BASICODE (on disk please), 
I'd appreciate a copy. There is some mention of additional 
material on CPMNL volume 5 (505). If you have this volume, or 
know of anyone who does, please send me a copy! 


Special thanks to Phil Coul!l in the United Kingdom who brought 
this material to my attention and sent me CPMNL volume 4! 


Bill Bolton, 
Software Tools RCPM, 
P.O. Box 357, 
Kenmore, 

QLD, 4069, 

AUSTRALIA 


Phone +61 7 378-9530 CCITT V.21 300 bps 


D> 


SIAGL Le we WUUL 


De NOS BASICODE voor CP/M systemen. 


Albert van der Horst 
Henk Wevers 
april 1983 


Achtereenvolgens zullen we in deze gebruiksaanwijzing de volgende 
punten behandelen: 


4s Hoe gebruik ik de programma's. 
2. Hoe pas ik de programma's aan voor mijn systeem. 


De BASICODE programmatuur voor CP/M systemen bestaat uit de 
volgende programma's: 


- BCREAD- .CQOM 
- BCWRITE .COM 
- BCTEST .COM 
- CONVERT .COM 
- BCe2 .BAS 


Bovenstaande programma's zijn voor het daadwerkelijk gebruik van 
BASICODE. 


Op de bij de CP/M gebruikersgroep van de HCC verkrijgbare 
diskette staan ook nog de programma's 


BCREAD .ASM 
BCWRITE .ASM 
BCTEST .ASM 
CONVERT .BAS 


Deze programma's zijn bedoeld om de programmatuur aan tev passen 
aan een specifiek CP/M systeem. We verwachten dat binnen een 
gebruikersgroep voor de meeste systemen deze aanpassing sne! voor 
elkaar zal zijn, zodat voor de meeste computers kant en klare 
programmatuur beschikbaar zal zijn. 


Naast deze programmatuur is er nog een vrij eenvoudig stukje 
hardware nodig om een casetterecorder op uw computer te kunnen 
aansluiten. Daarover later meer. 


In ieder geval dient U voor het gebruik van BASICODE onder CP/M 
te beschikken over een CP/M computer met minimaal 41 
parallel!lpoort. Vooor dit tfeaatste is een parallel printer 
aansluiting (b.v. Centronix type) bruikbaar. 

Tevens is een BASIC interpreter van bij voorkeur Microsoft 
noodzakelijk (MBASIC). 


Het werken met BASICODE 


Het lezen. 


- Sluit de casseterecorder via de speciale interface aan. 
- Tik BCREAD filenaam.bas 

- Start de recorder zodra dat wordt aangegeven 

- Stop de recorder zodra dat wordt aangegeven 


Het BASICODEprogramma staat nu op de diskette als een z.g. ASCII- 
file. 


Het lezen van de cassette kan zowel bij lezen als bij testen 
onderbroken worden, door een willekeurige toets in te drukken, 
maar alleen als de recorder stil staat. 


We moeten nu het programma geschikt maken voor BASICODE II_ en 
voor de Basicinterpreter. Deze laatste vraagt spaties om de 
sleutelwoorden, terwijl dit niet is geeist in de BASICODE 
standaard. 


- Tik CONVERTEER filenaam (dus zonder .BAS 1!) 


Het programma wordt nu van spaties voorzien zoals op het’~ scherm 
zichtbaar is. Het gewijzigde programma staat nu onder de ’=§ naam 
FILENAAM.BAS op de diskette, het orginele programma onder de naam 
FILENAAM.BAK. 


.- Start nu de BASIC interpreter met b.v. MBASIC 


- Tik LOAD "FILENAAM" (de file wordt geladen) 
- Tik MERGE "BCe" (BASICODE2 wordt geladen" 


U- kunt het programma nu starten met RUN en/of eventueel naar de 
diskette wegschrijven. Na dit wegschrijven is het programma 
zonder enig probleem uitvoerbaar met b.v. MBASIC FILENAAM 


Het wegschrijven van een programma naar de casetterecorder 


- Sluit de cassetterecorder aan via de speciale interface 

- Zorg dat het weg te schrijven programma geen regelnummers 
onder de 1000 meer heeft, eventuee!l voor het saven onder 
basic eerst DELETEn |! 

- Start de recorder 

- Tik BCWRITE filenaam.bas : 

- Stop de recorder zodra de prompt (A>) zichtbaar wordt. 

- Let erop dat BASICprogramma's weggeschreven moeten zijn met de 
A (ASCII) optie | 


Het aanpassen van de programmatuur 


De file BC2.BAS bevat de routines voor het BASICODEII protocol. 
Deze file moet als een ASCII-file op de diskette staan, anders 
kunnen we de _ rege!ls niet mergen. Eventueel na wijzigen dus 
wegschrijven met SAVE "FILENAAM",A. 


Deze routines moeten worden aangepast voor wat betreft de 
cursorbesturing, screenclear, en het ophalen van de cursorpositie 
voor de terminal die U gebruikt. 

De betreffende regels zijn: 


100 - 110 screenclear 

110 - 120 cursorbesturing (HO en VE bevatten de positie, 0,0 is 
linksboven) 

120 - 130 ophalen van de cursorpositie in HO en VE 


Mocht Uw terminal niet in staat zijn de cursorpositie op te 
halen, wijzig dan deze regels in: 


120 IF HO > Cuw regellengte) THEN HO = (uw regellengte) 
121 IF VE > (uw aantal regels) THEN VE = (uw aantal regels) 
122 RETURN 


De overige regels kunt U voor MBASIC zo overnemen. 


Aanpassing van BCREAD en BCWRITE en BCTEST 


Hiervoor hebt U de assemblerfiles nodig en de standaard CP/M 
assembler ASM.COM. Voor wat betreft de timing van het geheel, 
hier dient U enigszins te experimenteren. De aanlooppieptoon 
heeft een bepaalde lengte, probeer die zo nauwkeurig mogelijk te 
realiseren. 


BCTEST 


Voor het testen van een tape is er het programma BCTEST.COM. 
Dit is hee! simpel: 
- type UCTEST en start de cassette 


Nu verschijnt er een beeld als volgt op het scherm: 
* * 


Wanneer de linkse en rechtse sterren mooi onder elkaar staan” en 
het goed te zien is welke bij welke hoort dan komt de band goed 
door. Ze mogen wel iets op en neer gaan, maar van elke ster dient 
duidelijk te zijn aan welke kant hij hoort. 


wv 
) 
a 

L 


wry 


Uitleg: 

De linkse sterren geven de lengte aan van de korte 2400 perioden, 
de rechtse van de lange 1200 perioden. De onderste twee zijn van 
de halve periode dat het signaal O is en de bovenste 2 horen bij 
5 volt signaal. 


Normaal heeft een tekstfile onder CP/M zowe! Carriage Return als 
Linefeed tussen de rege!s staan. Ten behoeve van BASICODE wordt 
hier de linefeed afgehaald bij schrijven en teruggezet bij lezen. 
Verder wordt, wanneer de FIG optie aan staat er om de 64 charac-— 
ters een Carriage Return toegevoegd. Dit zal men alleen gebruiken 
bij FIGFORTH schermen. Bij het lezen met de FIG opties worden 
regels aangevuld tot 64 characters. 


BCREAD en BCWRITE 


De programmas’' kunnen met de normale DIGITAL RESEARCH assembler 
ASM geassembleerd worden. Er iS geen gebruik gemaakt van Z80 
codes. 

De programmas zijn voldoende gedocumenteerd om modifikaties moge— 
lijk te maken. Het volgende is bedoeld om degenen ap weg te 
helpen die wellicht geintimideerd worden door een assembler lis-— 
ting, maar toch best in staat zijn om de eenvoudige wijzigingen 
door te voeren voor hun eigen systeem. Dit laatste vooropgesteld 
dat er geen uitgebreidere modifikatie nodig zijn, zoals bij de 
Osborne het geval was. 

Met enig geluk is het voldoende de z.g. ‘assembler switchen' om te 
zetten. Bijvoorbeeld wordt door 


LET OSBRN 0 


alles wat op de Osborne betrekking heeft uitgeschakeld. 
Verder moet met 


LET MEMMAP O i.p.v. 1 gezet worden 


wanneer de Centronics poort op een I/O poort staat, hetgeen 
normaal het geval zal zijn en moet met 


PAPORT EQU XXXX 


het poort adres ingesteld worden. Dit lIaatste zal dus een getal 
kleiner dan 256 zijn bij I/O poorten. 

Op dezelfde manier moet ook voor 'SCREEN' een geheugenadres 
ingevuld worden, dat direct op het scherm te zien is (als dit 
z-g. 'memory mapped video' aanwezig is) 


SSSSSSSsesaeS ALS HET MOEILIJK WORDT --------3r tro r oo 


Hieronder volgen enige opmerkingen om behulpzaam te zijn bij 
verdere problemen. 


Wanneer er geen memory mapped video is, zullen de verschillende 
handigheidjes die laten zien wat er verstuurd wordt, niet’ snel 


u 


ov 
ai wv 


q 


ad 


genoeg zijn en achterwege moeten blijven. 
Tijdens de testfase kan men, m.b.v. 

LET DEBUG 1 
meer informatie op het scherm krijgen. 


Dit werkt alleen bij memory mapped video en niet te Ilangzame 
processors. 

Omdat er met software loops getimed wordt, zijn alle interrupts 
uitgeschakeld. Bij de Osborne betekent dit bijv. dat de disk 
drive niet uitgeschakeld wordt tijdens het schrijven van_ een 
cassette. (Als men dat vervelend vindt, kan men met’ schrijven 
wachten tot het diskdrive lampje uitgaat) 

Bij andere computers moet wellicht, teltkens wanneer de computer 
naar het toetsenbord moet kijken, de interrupts even ingeschakeld 
worden. 

De grenzen voor de vertragings loops zijn gebaSeerd op 4MHz Z80 


zonder ‘wait states'. Men kan aan de trailer en header,die 5 
seconden moeten duren, de constante 'DEL24' controleren en even- 
tueel bijstellen. In eerste instantie kan men dan voor’ 'DEL12'! 


het dubbele van 'DEL24' nemen. Met een klein testprogrammatje die 
een vast aantal periodes schrijft (m.b.v. BEEPV) kan men dit nog 
controleren. 

Bij het tlezen is er alleen de constante 'CRIT', die de grens 
aangeeft tussen wat als een 1 en wat als O beschouwd wordt. 

Bij redelijke hardware blijkt deze vrij ongevoelig te zijn. 
'CRIT' kan men ook evenredig bijstellen. Een betere (en tijdrove-— 
nde ) procedure is: de grenzen bepalen waartussen 'CRIT' zich mag 
bewegen, en daar het midden van kiezen. 

Bij de UCTEST tenslotte kan men de horizontale schaal eventueel 
halveren of verdubbelen, door arithmetische shifts in te voeren 
of weg te laten. 


BENODIGDE HARDWARE 


De hardware is zeer simpel en bevat geen voeding. 

We gaan uit van de aanwezigheid van een Centronics’ interface 
poort. Deze bevat [(o.a.) 8 bits data uitvoer naar de printer en 
1 bit invoer {( ready signaal ). Deze worden gebruikt, zonder 
verdere modifikatie of aansturingscommando's. Dit heeft tot 
gevolg dat het interface voor alle CP/M machines’ hetzelfde 
kan zijn. De pintelling zoals die in het volgende gebruikt 
wordt is die van de 'normale' Centronics connector zoals die 
b.v. in de Epson printers etc. wordt toegepast (36-polig Amphe- 
nol) 


CENTRONICS . 


BIT O 


-> CAS INPUT 


=> I | 


| 
| 
I 

l 3K | I 1 5K6 | 
het Bea ee l 
(optioneel ) I 
| 


-> CAS AARDE 


De 3 Kohm weerstand wordt nu nog niet gebruikt, maar is bedoeld 
om in de toekomst voor een golfvormverbetering te kunnen’ zorgen 
door 2 bits te gebruiken. Wellicht is dat niet haalbaar voor 
langzame processoren. 


PRINTER READY 


a ee | 22 OHM I 
<- | | Ie et] <- CAS LUID- 
| ! SPREKER 
| DUG | ZENER 4.7V 
a | 
7% /\ 

/ \ / \ 

/ \ / \ 
| | 
| | 

CAS AARDE 


<- 


Men dient een stevig signaal toe te voeren aan dit interface. Dit 
is geen probleem als men de [Iuidsprekeruitgang gebruikt van’ het 
soort goedkope cassette recorders waar 41.5 Volt cellen in 
kunnen (dus 6 Volt voeding ) De HiFi apparaten geven i.h.a. toch 
heel stechte resultaten als oapslagmedium ! 

Deze apparaten hebben een ingebouwde opnamesterkteregeling, dat 
is ook een zorg minder. Hoewel het test programma het mogelijk 
maakt eens te bekijken wat het effekt van de regelknoppen is, kan 
men zonder meer de zaak op zijn hardst zetten. 


Voor de niet-elektronici: 


het schema bevat niets magisch en er gebeurt bijna niets Bij 
lezen van de cassette wordt alleen de computer beveiligd tegen 
verkeerde spanning Bij schrijven wordt het signaal verzwakt~ en 
de hoge tonen nog eens extra. 


POLY-VU 
#PY119 


Ker) TORRANCE, CA 90503 ° —_ 


-CATALOG256 
COMP68 DOC 
COMP68 REL 
COMP68 SS 

CRC COM 
DELBR COM 
DIALOG11BAS 
DIALOG11COM 
DIALOG11 DOC 
ERAQ68 DOC 
ERAQ68 REL 
ERAQ68 S 

JOIN ACG 
OSGAMESILBR 
PERCOMP CAL 
PERCOMP DOC 
SIG-M LIB 
TFR-INSTCOM 
TFR-INSTDTA 
TFR-INSTMSG 


~ TRANS-OLINC 


TRANS-0O2INC 


More.. 

TRANS-03 INC 
TRANS-~04INC 
TRANS-O5INC 
TRANS FERCOM 
TRANS FERDOC 
TRANSFERPAS 
TURBOJRTPAS 
29 file(s). 


SIGMUG vol. 


29 directory entries remaining. 


D>STAT O: 


Bytes Remaining On O: 10k 


D> 


256 


10/10/86 


TYPE -CATALOG. 256 
SIG/M Volume 256 CP-M 68K File Compare & Erase, Logon Script, 
‘ : MS-DOS Transfer, Osborne Games, etc 


. “CATALOG. 256 contents of SIG/M Volume 256 
released January 17, 1986 


SIG-M - LIB donation form 

CRC - COM checksum program 

JOIN - ACG Amateur Computer Group membership form 
DELBR .~COM to remove .LBR files type DELBR filename 


index name size cre description 


256.01 COMP68 .DOC 1K 7C 9A file compare in CP-M 68K 

256.02 COMP68 .REL 2K 44 99 

256.03 COMP68 .S 7K 43 DB / 

256.04 ERAQ68 .DOC 1K 6E 97 querry erase in CP-M 68K 

256.05 ERAQ68 .REL 1K A7 8D / 

256.06 ERAQ68 .S 4K 5E 8c / 

256.07 DIALOG11.BAS 27K 2E BD script for BBS logon (compiles 

256.08 DIALOG11.COM 27K A7 0B with BASCOM) 

256.09 DIALOG11.DOC 8K CB FF / 

256.10 OSGAMES1.LBR 35K 4C 3F Osborne games 

256.11 PERCOMP .CAL 3K 82 89 SC template for chemical compositions 
256.12 PERCOMP .DOC 4K BC 16 

256.13 TFR-INST.COM 23K 4B 3E file transfer between MS-DOS and CP-M 
256.14 TFR-INST.DTA 5K C5 FA (in Turbo Pascal) 

256.15 TFR-INST.MSG 3K FF 88 / 


256.16 TRANS-01.INC 6K 59 FC / 
256.17 TRANS-02.INC 6K Cl OA / 
256.18 TRANS-03.INC 2K D4 92 / 
256.19 TRANS-04.INC 5K EE DF / 
256.20 TRANS-05.INC 5K 9D 2B / 


256.21 TRANSFER.COM 19K 4E DE vA 

256.22 TRANSFER.DOC 4k FO 9A J 

256.23 TRANSFER.PAS 6K 23 33 / 

256.24 TURBOJRT.PAS 2K C4 32 Turbo routines for JRT pascal 
SIG-M Library -CATALOG Volume Number-256, 24 Files cataloged. 


Copyright (c) 1986 by Sig/M-Amateur Computer Group of New Jersey Inc. 
P.O. Box 97, Iselin, NJ 08830 USA 


D> 


D>TYPE 
COMP68 


D>TYPE 
ERAQ68 


D> 


0:COMP68.DOC 

performs a byte by byte compare on any two files whose unambiguous 
filenames have been supplied as CCP command line parameters. 
Differences are displayed on the CON: device in hex and, if the hex 
value represents a printing ASCII character, also in ASCII. 
Scrolling can be stopped with “S and continued with “QQ. “*C aborts. 


Please send bug reports to Edmund Ramm 
P.0.Box 38 
D-2358 Kaltenkirchen 
Tel.: (04191) 1621 
Fed. Rep. of Germany 


0:ERAG68.DOC 

can be invoked with both ambiguous and unambiguous filenames, even 
though the latter form would be no real improvement over CCP's ERA. 
When called with an ambiguous file specification as the CCP command 
line parameter, ERAQ68 asks you to confirm the erase request for 
every filename match. You can answer either Y or N (Cupper or lower 
case) to erase or to skip to the next file name match respectively. 
Use “C to return to the CCP. 


Please report bugs to Edmund Ramamo 
P.0.Box 38 
D-2358 Kaltenkirchen 
Tel.: (04191) 1621 
Fed. Rep. of Germany 


TYPE O:DIALOG11.DO0C 
PROGRAM: DIALOG 


WRITTEN BY: E. VERNON BUCK 
SAN LORENZO, CA. 
(415) 276-4607 


VERSION: 1.1 
DATE: DEC. 31, 1985. 


DIALOG IS A PROGRAM WHICH CAN AUTOMATICALLY CONDUCT 
A DIALOG WITH A REMOTE COMPUTER, DATABASE SYSTEM, OR BULLETIN 
BOARD. DIALOG READS "INSTRUCTIONS" FROM AN "INSTRUCTION FILE". 
THIS FILE IS PRODUCED BY ANY EDITOR OR WORD PROCESSOR. THE 
INSTRUCTION FILE TELLS THE PROGRAM HOW TO CONDUCT THE "DIALOG" 
WITH THE REMOTE (OR "HOST") COMPUTER. THE INSTRUCTIONS TELL 
THE PROGRAM WHAT MESSAGES TO SEND, AND WHAT MESSAGES TO RECEIVE 
FROM THE HOST. THE PROGRAM HAS ERROR DETECTION, AND CAN ALSO 
MAKE SOME SIMPLE DECISIONS (BRANCHING) BASED ON THE CONTENT OF 
MESSAGES RECEIVED FROM THE HOST. THE DIALOG IS DISPLAYED ON THE 
TERMINAL AS IT HAPPENS, AND (OPTIONALLY) RECORDED 
IN A "LOG" FILE. 


THE INSTRUCTIONS AVAILABLE ARE AS FOLLOWS: 
S,ccc...c SEND THE STRING ccc...c TO THE HOST. 
THE SEND COMMAND EXPECTS THE 
CHARACTERS TO BE ECHOED BY THE HOST. 


T,ccoc...c TRANSMIT THE STRING ccc...c TO THE 
HOST. IDENTICAL TO THE S COMMAND, 
EXCEPT DOES NOT EXPECT AN ECHO, 


R,ttt...t RECEIVE A STRING OF CHARACTERS FROM 
THE HOST UNTIL THE "TERMINATION" STRING 
ttt...t IS RECEIVED. ANY NUMBER OF 
CHARACTERS CAN BE RECEIVED BEFORE THE 
TERMINATION STRING IS ENCOUNTERED, BUT 
ONLY THE LAST 2000 (ABOUT 1 SCREENFULL) 
WILL BE RETAINED. 


I,ddd...d,n IF THE LAST RECEIVED CHARACTERS 
(INCLUDING THE TERMINATION CHARACTERS 
FROM THE R INSTRUCTION) WERE ddd...d, 
THEN JUMP TO THE INSTRUCTION LINE 
’ LABELED n. n IS A NUMBER FROM 
1 TO 9999, 


G,n GO TO (JUMP UNCONDITIONALLY) TO THE 
INSTRUCTION LINE LABELED n. 


E,i,n IF AN ERROR CONDITION OF TYPE i IS 
DETECTED, THEN GO TO THE 
INSTRUCTION LINE LABELED n. 


i CAN BE: 
"SE" — SEND INSTRUCTION ECHO ERROR 
"RE" — RECEIVE INSTRUCTION 


PARITY, FRAME OR OVERRUN ERROR 

"TO" — TIME OUT 

"CL" - CARRIER LOST. 
n = 0 MEANS IGNORE THE ERROR, AND 
CONTINUE. THIS IS THE DEFAULT. 
n = -1 ("SE" ONLY) MEANS SEND A 
BACKSPACE AND REPEAT THE ERRONEOUS 
CHARACTER Qo” 


L,Itl CONTROL THE AMOUNT OF INFORMATION TO 


3: wAVEs qous& L G&G tizbLee 

[1 1=ON -- SAVE RECEIVED DATA ONLY 

111=OFF--— SAVE NOTHING 

IT 1T=ALL-- SAVE BOTH TRANSMITTED AND 
RECEIVED DATA (DEFAULT) 


D,ddd CONTROLS WHETHER THE DIALOG WILL BE 
: DISPLAYED ON THE TERMINAL AS IT 
HAPPENS: 
ddd=OFF -- NOT DISPLAYED ON TERMINAL 
ddd=ON -- DISPLAYED ON TERMINAL 
(DEFAULT) 
C,p MAKE p THE CONTROL CHARACTER PREFACE 


FOR THE INSTRUCTION LINES THAT FOLLOW. 
I.E., “M WOULD BE TRANSMITTED AS A 
CTRL-M WHEN p="*", DEFAULT IS "7", 
THE C INSTRUCTION IS NON-EXECUTABLE. 
THAT IS, IT OPERATES ON THE INSTRUC- 
TIONS AS THEY ARE COMPILED, BUT NOT 
AS EXECUTED (SINCE INSTRUCTIONS 

MIGHT BE EXECUTED IN A DIFFERENT 
ORDER). 


X EXIT. CLOSE FILES AND RETURN TO CP/M. 


INSTRUCTIONS CAN BE PRECEEDED BY A "LABEL NUMBER". THIS IS LIKE A 
LINE NUMBER IN BASIC OR FORTRAN. IT IS OPTIONAL. BUT OF COURSE, IF 
THERE IS AN I, G OR E INSTRUCTION ANYWHERE IN THE INSTRUCTIONS, 
THEN THERE MUST BE A LABELED INSTRUCTION WHICH MATCHES THE 

LABELS GIVEN IN THE I, G OR E INSTRUCTION. EXAMPLE: 

100,S,hello°M 


G,100 


NOTES: (1) ALL INSTRUCTION PARAMETERS MUST BE SEPARATED BY COMMAS. 
(2) IF A COMMA IS NEEDED IN A CHARACTER STRING, THEN 
SURROUND THE STRING WITH QUOTES [("..."). 
(3) LEADING BLANKS ARE IGNORED, UNLESS THE STRING IS QUOTED. 
(4) DO NOT USE TAB CHARACTERS (CTRL-I) TO INDENT. 
USE SPACES. 


FOLLOWING IS A SAMPLE INSTRUCTION FILE. THIS SET OF INSTRUCTIONS 
WAS DESIGNED TO LOG ON TO A COMMERCIAL DATA BASE SYSTEM (I.E. 
COMPUSERVE), JUMP TO THE FINANCIAL SECTION OF THE SERVICE, GET 
QUOTATIONS ON SEVERAL SECURITIES, AND THEN LOG OFF. THERE IS 

ALSO PROVISION FOR ERROR RECOVERY. 


E,SE,-1 
E,T0,100 
E,CL,200 


I,"Password: ",30 
10,S,CIS"M 
G,5 
20,S,"00000,9999-MmM" 
G,5 
30,1T,MY+PASSWORD“M 
E,RE,510 
35,T,*C 
40,R,1/ 4 
60.S,GO MQINT*M 


sp Vigd* 
70,R,"Interface: " 
80,S,"DATE*M" 
R,"Interface: " 
$,100°M 
R,: 
s," 
90,R,: 
S,°M 
R,"Interface: " 
100,S,O0FF*M 


FNI,VWESGX,LMVTX*M" 


TO INVOKE THE PROGRAM, TYPE 

DIALOG insfile.dig logfile.log 
WHERE insfile.d!lg IS THE FILE CONTAINING THE INSTRUCTIONS, AND 
logfile.tog IS THE LOG FILE (TO BE WRITTEN BY DIALOG). THE LOG 
FILE IS OPTIONAL AND CAN SIMPLY BE OMITTED. THERE ARE NO DEFAULT 
FILE NAMES OR EXTENSIONS. REPLACING ltogfile.log WITH A QUESTION 
MARK WILL CAUSE THE INSTRUCTION FILE TO BE COMPILED, BUT NOT 
EXECUTED, FOR TESTING PURPOSES. 


DIALOG IS WRITTEN FOR COMPILATION WITH BASCOM BY MICROSOFT. THE 
DISTRIBUTED VERSION IS SET UP FOR I/O USING A TYPE 8251 USART, 
AT PORTS OO AND 01. THE PROGRAM WILL MOST LIKELY HAVE TO BE 
MODIFIED FOR PARTICULAR SYSTEMS. IF YOU HAVE BASCOM AVAILABLE, 
THIS SHOULD BE EASY. IF NOT, IT MAY BE POSSIBLE TO PATCH THE 
DIALOG.COM FILE AS DESCRIBED BELOW. 


PATCH AREA CONSTANTS: 

DATA.PORT% = I/0 DATA PORT FOR MODEM 

CTRL.PORT% = I/0 PORT TO READ TO TEST FOR TRANSMIT/RECEIVE 

READY 

TRDY.MASK% = THE BIT TO TEST FOR TRANSMIT READY (IS SET TO 1) 

TRDY.POL% = SET THE SAME BIT AS TRDY.MASK% TO 1 TO REVERSE THE 
POLARITY OF THE TEST (I.E. READY WHEN BIT = QO} 

RRDY.MASK%, RRDY.POL% = SAME FOR RECEIVE READY 

RERR.PORT% = I/0 PORT TO READ TO TEST FOR READ ERRORS 

RERR.MASK%, RERR.POL% = BITS TO TEST FOR READ ERRORS (1.E. 
PARITY, FRAME AND/OR OVERRUN), AND POLARITY OF SAME 

RES.PORT% = I/0 PORT TO RECEIVE THE FOLLOWING RESET BYTE. (SET TO 

-1 IF NO RESET BYTE IS REQUIRED) 
RERR.RES% = BYTE TO SEND TO RESET PORT TO RESET UART AFTER 


CARRIER.POR 
CARRIER .MAS 
CARRIER.POL 


RECEIPT OF PARITY, FRAME OR OVERRUN ERROR 
T% = I/O PORT TO READ TO TEST FOR CARRIER PRESENT 
K% = THE BIT(S) TO TEST FOR CARRIER PRESENT (E.G. DSR) 
% = POLARITY OF CARRIER BIT(S) 


cC.PREF$ = THE CHARACTER THAT PRECEEDS A CHARACTER TO INDICATE 
THAT THE 2ND CHARACTER IS A CONTROL CHARACTER. 
(I.E. “M = CTRL-M, WHEN CC.PREF$ = "*") 
MAX.TIME = APPROX. TIME OUT TIME. FOR 4MHZ CPU, 1100 “= 1 SECOND 
HOW TO PATCH THE .COM FILE: 
USING DDT.COM, OR SOME OTHER PATCHING PROGRAM, FIND THE FOLLOWING 


DATA STATEM 
STATEMENTS 


ENTS. THEY ARE PREFACED BY THE WORD "PATCH:", THE 
SHOULD BEGIN AROUND 1S850HEX IN THE .COM FILE. CHANGE 


D> 


WonB 


DECIMAL 


(1) 
(2) 
(3) 
(4) 
(5) 
(6) 
(7) 
(8) 


(9) 


(10) 
(11) 


(12) 
(13) 
(14) 
(15) 


(16) 


115 
AND 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 


THE 


THE 


“ULcLUA Ws “PATCH:" 10 SULT YOUR SYSTEM. THEY ARE IN 
ASCII, AS FOLLOWS: 

UART DATA I/0 PORT NUMBER ; 

UART TRANSMIT/RECEIVE READY I/0 PORT NUMBER 

BIT TO TEST FOR TRANSMIT READY 

BIT TO BE EXCLUSIVE OR'ED BEFORE TESTING FOR TRANSMIT 
BIT TO TEST FOR RECEIVE READY 

BIT TO BE EXCLUSIVE OR'ED BEFORE TESTING FOR RECIEVE 
I/0 PORT TO READ FOR RECEIVE ERRORS 

BIT(S) TO TEST FOR RECEIVE ERRORS (PARITY, FRAME 
AND/OR OVERRUN, ETC.) 

BIT(S) TO BE EXCLUSIVE OR'ED WITH THE ERROR BITS 
BEFORE TESTING 

I/O0 PORT TO SEND A RESET BYTE TO (-01 IF NONE) 


BYTE TO SEND TO THE RESET PORT TO RESET UART FOLLOWING 


THE 
THE 
THE 
THE 


THE 


DATA 


RECEPTION OF A TRANSMISSION ERROR 

I/O PORT TO READ FOR CARRIER PRESENT TEST 

BIT(S) TO TEST FOR CARRIER ON (1.E., THE DSR LINE) 
BIT(S) TO BE EXCLUSIVE OR'ED WITH THE CARRIER ON BIT 
BEFORE TESTING 

DEFAULT CHARACTER TO BE A PREFACE FOR CONTROL 
CHARACTERS 

TIME OUT COUNTER MAXIMUM 


"PATCH: ",000,001,001,000,002,000,001,008,000 


DATA 001,055,001,128,000 


DATA 


"-" 966000 


PERCOMP .CAL 


a Supercalc(tm) template 
for chemical percent compositions 
by 
° Stephen J. Cebula 


INTRODUCTION 


PERCOMP.CAL is a sample template for determining chemical 
Percent compositions in Supercalc 2. It contains the worksheet 
for a sample molecule already, but you can fill in the data 
for the molecule you are looking for. All of the elements are 
not ltisted merely for convenience, because, a template of over 100 
elements is a bit impractical to solve a percent composition 
Problem for a molecule with only 3 or 4 elements. 


PERCOMP.CAL was created by Stephen Cebula as an exercise from 
his chemistry 101 class. It serves as a useful example of how the 
computer can be used by a student other than for word processing. 


FORMULAS 


When you insert new elements in this template, pay close 
attention to the formula used to determine the individual percent 
composition for an element. It is the net mass of that element in the 
molecule, divided by the total mass of the molecule, times 100 to 
get a percentage. A sample formula for column E which represents the 
individual percent composition would look like this for the element in 


rl 20: 


where D25 represents the total molar mass of the molecule and D20 is 

the net mass of the element. Here, oxygen (0), has two atoms (from data in 

column C) and an atomic mass of 15.994 (for each oxygen atom). Therefore, 

the net mass equals 2 times 15.994 or B20*C20 in Supercale notation. A little 
reminder, when you insert or delete atoms in this list, you should also make sure 
that the equations are in the same form as the original ones, Also, you must 

make sure that the cell representing the total molar mass (D25 in this case) is 
the sum of all net masses. It is SUM(D8:D23) in the original version. 


D20/D25*100 


USAGE NOTICES 


This template is for the public domain only. It may not sold or 
published in any form without permission of the author, Stephen J. Cebula; 
if you have any ideas to improve this template or for other useful 
applications for students, please feel frae to contact the author via 
mail or one of the following Pennsylvania bulletin boards: 


Allentown RCP/M 215-398-3937 


CTS RCP/M 215-947-3615 <not 2400 baud> 
System-2 TBBS 215-825-3205 
g write: 
Stephen J. Cebula & 
2349 Packard Avenue f 


Huntingdon Valley, PA 19006 


Vou .cHSIONS 


Enjoy this Supercalc template. It serves aS a example of how the computer 
Can be of use to non-Computer Science majors in an educational setting other 
than just word processing. The same technique can be used with other spreadsheets 
to solve the percent composition problem. 


°o A version of this template exists for Multiplan(tm) in CP/M(tm) and Apple 
a 


Cintosh(tm) form. If you are interested in such items, just contact me in one ao, 
the forementioned ways. 


D> 


te °C 
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* TRANSFER DOCUMENTATION * 
2 oe oe oe ak oe ae ae ak ok ake a ak ae a a ak ak ae a ak ak ak a ae 


by 
David Koski 
P.O. Box 1078 
Fort Bragg, CA 95437-1078 


I. INTRODUCTION 


TRANSFER is a utility that provides an easy method of transfering 
files to and from MS/DOS compatable disks with a CP/M host 
system. Written completely in Turbo Pascal, it includes’ these 
features: 


- Full Access of directory of MS/DOS with ambiguous 
file reference 


- Access to CP/M directory with ambiguous file 
reference 


- Display of MS/DOS FAT (File Allocation Table) 
- FAT recovery from backup FAT (Careful!) 


- File transfer to and from MS/DOS using PIP-like 
ambiguous (wild card) file references 


- Source code —- —- of course 


II. INSTALLAtTION 


After making a working copy of the distribution disk, with your 
original disk in a safe place you should have the _ following 
files: 


TRANSFER.COM TRANS-01.ING TFR-INST.COM 
TRANSFER.DOC TRANS-O2.INC TFR-INST.MSG 
TRANSFER.PAS TRANS-O3.ING TFR-INST.DTA 
TRANSFER.DOC TRANS-O4.INC 

TRANS-O5.INC 


For screen functions use TFR-INST, a GINST-made instalation 
program. Instali TRANSFER the same way you instal! TURBO PASCAL. 
TFR-INST.MSG and TFR-INST.DTA are used by TFR-INST.COM. 


Now the BIOS in your system must know that your MS-DOS disk is 
"foreign". Many systems come with a utility to accomplish this. 
Your BIOS usually not only must know the sector size of the MS-— 
DOS disk (usually 512) but the Density (Double). In short You 
must "tell" your BIOS that the drive with the MS-DOS disk in it 
is "IBM-PC DS" or something similar. For reasons mentioned above, 
TRANSFER is system BIOS dependent. If that wasn't enough, each 


different BIOS likes to do the BIOS function call Sectran it's 
Own way. Some systems need TRANSFER to call Sectran before each 
sector read. Also, in some systems a sector bias needs to be 


applied to each BIOS call from TRANSFER. These variations are 
accomplished by patching the constants in the source TRANSFER.PAS 
and recompiling. Some experimenting may be necessary. For 
example some Kaypros need "SO = 4" to give a sector bias of 4, 
This is because of 4 CP/M records (128 bytes) are in each 512 
byte MS-DOS sector. 


eel 
e ve 


(eo 4 


o 


Many systems automaticly identify newly logged on disks. The 
trouble is they usually come up with the wrong inentity for’ the 
MS-DOS disk and often think it is single sided. If you are 
unable to patch your BIOS to prevent this then you may be able to 
use single sided MS-DOS disks only, or trick your system by 
logging on to a standard double sided disk first. Then without 
warmbooting, bring up TRANSFER. Systems with single sided drives 
can of coarse only transfer single sided disks and TRANSFER may 
need minor modification. 


y 
és * 


